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Mountain Computer 
can now 


EXPAND 


Your Apple II Peripheral Capacity 
EXPANSION CHASSIS 


Quality You Expect 


Eight more slots for your Apple! Now you 
can bank-select eight more peripheral slots 
with immediate or deferred software 
commands—like having up to 15 peripheral 
cards “on line”—or use the Select/Deselect 
switch mounted on the front panel. 
Expansion Chassis’ heavy-duty power 
supply is primarily for peripherals, without 
the heavy demand of motherboard support 
chips required in your Apple. This means 
much more power is available for peri- 
pherals than in your Apple itself! If you've 
run out of room in your Apple—Expansion 
Chassis is your answer. Drop by your Apple 
dealer for a demonstration, or contact 
Mountain Computer for the location of 

the dealer nearest you. 


Va 
a 
Mountain Computer 


INCORPORATED 


Performance You Demand 


e Eight mirror image I/O slots of the Apple 

Fully buffered, bi-directional data lines 

Apple Il compatible interface card 

Dual selection capability; hardware or 

software 

e Immediate or deferred selection in 
software mode 

e From BASIC, a single POKE command 
turns the chassis ON or OFF 

© Compatible with al! software 

e Dedicated power supply with 
approved power transformer 


Mountain Computer 


INCORPORATED 


300 Harvey West Blvd., Santa Cruz, CA 95060 
(408) 429-8600 TWX 910 598-4504 
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IT JUST DID. 


Everyone expected it would happen 
sooner or later... with J 

it already has! Now all the marvelous 
benefits of expensive and advanced 
word processing systems are available 
on Commodore computers, America’s 
largest selling computer line. WordPro 
PLUS, when combined with the new 80 
column CBM 8032, creates a word pro- 
cessing system comparable to virtually 
any other top quality word processor 
available—but at savings of thousands 
of dollars! 


Model Go32 


New, low cost computer technology is 
now available at a fraction of what you 
would expect to pay. This technology 
allowed Commodore to introduce the 
new and revolutionary CBM 8032 
Computer. 


WordPro PLUS turns this new CBM 
8032 Computer into a sophisticated, 
time saving word processing tool. With 
WordPro PLUS, documents are dis- 
played on the computer's screen. Edit- 
ing and last minute revisions are simple 
and easy. No more lengthy re-typing 
sessions. Letters and documents are 
easily re-called from memory storage 
for editing or printing with final drafts 
Printed perfectly at over five hundred 
words per minute! 


Our nationwide team of professional 
dealers will show you how your office 
will benefit by using WordPro PLUS. At 
a price far less than you realize. 


Invest in your office’s future... 
Invest in oat 

Call us today for the name of the 
WordPro PLUS dealer nearest you. 


Professional Software Inc. 
166 Crescent Road 
Needham, MA 02194 

(617) 444-5224 

TELEX: 95 1579 


WHY THE MICROSOFT 
RAMCARD MAKES OUR SOFTCARD 
AN EVEN BETTER IDEA. 


Memory — you never seem to have quite applications like the Peachtree Software account- 
enough of it. ing systems. VisiCalc™ and other Apple software 
But if you're one of the thousands of Apple packages can take advantage of RAMCard too. 
owners using the SoftCard, there’s an economical And RAMCard gives you the extra capacity to 
new way to expand your memory dramatically. develop advanced programs of your own, using the 
= SoftCard and CP/M. Even with the RAMCard in 
16K ON A PLUG-IN CARD. place, you can still access your ROM BASIC 


Microsoft's new RAMCard simply 


: id monitor routines. 
plugs into your Apple II® and adds 16k au 
bytes of dependable, buffered JOIN THE SOFTCARD 
read/write storage. FAMILY. 


Together with the SoftCard, 
the RAMCard gives you a 56k 
CP/M® system that’s big enough 
to take on all kinds of chores that 
would never fit before (until now, 
the only way to get this much 
memory was to have an Apple 
Language Card installed). 


The RAMCard is just the 
latest addition to the SoftCard 
family — a comprehensive sys- 
tem of hardware and software 
that can make your Apple more 
versatile and powerful than you 
ever imagined. 

Your Microsoft dealer has all 


GREAT SOFTWARE: the exciting details. Visit him 
i soon, and discover a great idea 
YOURS, OURS, OR THEIRS. that keeps getting better. 
With the RAMCard and Microsoft Consumer 


SoftCard, you can tackle large- 
scale business and scientific 
computing with our COBOL and 
FORTRAN languages. Or greatly 
increase the capability of CP/M 


Products, 400 108th Ave. N.E., 
Suite 200, Bellevue, WA 98004. 
(206) 454-1315. 
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Robert Lock, 
Editor/Publisher 


Software coryings Revisited, 
Or Who’s Paying The Bills? 

We recently received an extensive letter from a 
Canadian subscriber commenting on the January 
editorial regarding software piracy. I’d like to 
respond to one specific point of the letter now, and 
request other readers to respond at length as well. 
Let’s get the dialogue rolling, and we’ll continue it 
from here. I really think it’s a critical turning point 
in the industry’s future development. I don’t 
presume to suggest we can solve it here, but I’d like 
COMPUTE! readers to help spark and maintain the 
dialogue. Here’s the prompting remark from the 
reader: 

I agree to a great deal with your comment on copyright 

of magazines and books and software. I disliked your 

generalizations about schools. Schools are rather like big 
businesses. If a business has a number of machines and 
purchases say a “‘General Package’’, is it really break- 

ing copyright to make enough copies to be used on all its 

machines? I don’t think so. I reckon schools are in a 

similar situation... 

First of all, your comment presumes that big 
business has the right to copy (reproduce) proprietary 
software. They don’t have the right to do so any 
more than Commodore (for example) would have the 
right to buy one copy of a program and give it away 
with all of their computers. Frequently, ‘“‘big 
business’’is able to buy a piece of software with 
limited license rights, they pay additional fees. This 
is not the case with the software we’re talking about 
for our marketplace. I’d like to propose an analogy... 
suggested by an individual involved in software sales. 
He commented on a ‘‘textbook defense’’ of software 
theft, and I’ll expand on it here: 

Let’s assume that you’ve taken your notes and 
teaching experiments from the last few years, and 
spent a recent summer developing them into a 
textbook, complete with student workbook full of 
exercises. 

You find a publisher, obtain a contract wherein 
you receive a royalty on sales, go through numerous 
editings, and finally see your first copy in the mail. 

Your book is selling for $19.95, and you’re 
looking forward to some return from your royalties. 


Time Passes 

Sales are going along okay, but not up to your ex- 
pectations. I mean it is an excellent book. You attend 
a regional educational conference, and run into Dr. 
So and So from a neighboring school district. He 


says, ‘‘We really enjoyed your new text, and it’s 
super! We’re using it in all of our classes next year.’’ 

Great (you think). Hundreds of sales. ‘‘Oh, by 
the way,’’ he continues. ‘‘We thought $19.95 was 
pretty expensive, so we only bought one copy. We’re 
running off class copies in our own print shop. ..See 
you later.”’ 

There goes your work, and your royalty. I 
assume you’re concerned, if not angry. Is this any 
different in principle, from the defense of schools and 
software copying. Now we all know that realistically, 
the book would be rather expensive to duplicate. And 
I presume no one would doubt the illegality of the 
act. The essence of the argument would seem to 
become one of ease and expense of the copying. Soft- 
ware comes on an inexpensive, easily transportable 
media. Therefore, does copying it suddenly become 
okay? We need to give thought as well to the pro- 
ducers of the work. With commercial software, 
there’s someone out there, after some amount of 
hard work, patiently waiting for their royalty. 

I would suggest that users should not define a 
$19.95 software purchase as an unlimited right to 
copy, just as they wouldn’t consider doing the same 
with a $19.95 textbook. 

It would be more appropriate to approach pro- 
ducers about school licensing agreements, or multiple 
copies at school discount through their vendors, or 
whatever. This rational (negotiated) approach, if you 
will, would solve problems for several parties... 
Schools who currently buy multiple copies of soft- 
ware would save money, schools (individuals) who 
currently buy and reproduce would have full vendor 
support, and so on. The vendor support is an ele- 
ment we haven’t touched on, but is part of the whole 
problem. I’ve been told, essentially, ‘‘Why should I 
support the educational market? They just steal my 
stuff.”’ 

A Post-Script 

These comments should in no way infer that most 
schools aren’t absolutely honest in their software pur- 
chases. We’re just using this initial analogy to get the 
ball rolling. We’ve heard recently of a major in- 
dustrial research center on the West Coast that’s 
using approximately 80 copies of a $150.00 plus soft- 
ware package. ..copies cloned from their original 
single copy purchase. And how many times have you 
picked up that ‘‘back-up’’ copy of Cursor magazine 
to use just this once? 


Defining The Right Of Back-up 


Several other magazines in the industry have recently 
been running advertisements for a program that 
copies (duplicates) protected software for a particular 
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3-D ANIMATED COLOR GRAPHICS 
Written in machine code 

The program made famous on national T.V.! 
by Paul Lutus 


APPLE WORLD turns your Apple into a sophisticated 
graphics system capable of creating animated 
three-dimensional color images, projecting them in 
true perspective on the screen, rotate them, move 
them closer, further away, and many other exciting and 
imaginative things, 


Draws objects with 65,000 points per side 


Show and is now available for sale. 


APPLE WORLD'S powertul editor is so easy to use that 
children will loveit. You can row “sketch” yourdream 
house, boat, car, orfantasy empire Then view it as it 
would be seen from 10,000eet, or youcan ZOOM in 
until the screen is filled with a doorknob. You could 
then go inside and move from room to room 
examining furniture placement as your screen rotates 
within the room, Images or specific parts of images 
can easily be saved to disk or printer. 


Does all this sound like science fiction? 
You won't think soafter you have visited Apple World. 


INTRODUCTORY PRICE $59.95 
36 page manual included 


For 48K Apple Il or Plus with Disk 


A powerful screen-oriented text editor is included to 
facilitate image fomation. This program was recently 
featured on Tom Snyder's Prime Time Saturday TV 


3-D 
ig fee 


& 3-D GAME DEVELOPMENT SYSTEM IN COLOR 
by Paul Lutus 


Watch colorful buttertlys, birds, fly across your Apple 
or Atari screen with true3 dimensional perspective 
Have rocket ships fly out at you in this incredible high 
speed graphics package. 3-D SUPERGRAPHICS™ is, 

a 6502 machine language program that will 

interface to your Basic or machine language 

programs or games using simple “DOS-like” commands. 


Features include: 

‘© Simple image entry through editor 

* Objects up to 256 points per side 

# Uses all hi-res colors 

'* Allows mixed colored text & graphics 
for promots and captions 

* Translates on 3 axes 

* Individual axis scales 

'* 21 different commands 

© Rotate object 1.4° to 360 
increments at machine speeds 


KKKKK 


FOR 48K APPLE II OR PLUS WITH 
DISK 11 $39.95 FOR DISK 


FOR ATARI 800 WITH 40K MEMORY 
(DISK OPTIONAL) 


$39.95 FOR TAPE 


OTHER SOFTWARE 


Address all advertising materials to: 
COMPUTE 

200 East Bessemer Avenue 

Greensboro, NC 27401 USA 


APPLE COMPUTERS 
‘Super Space Wars .....$ 9.95 
States & Capitals 9.95 


Moding Pols 
Malling address: COMPUTE! Shock options 
Post Office Box 5406 pee 


Greensboro, NC 27403 USA 


COMMODORE PET 


Ka KKK KK KK 


Telephone: (919) 275-9809 Stock Options ......... 24.95 
Finance 1295 
Bonds 1295 
Stock Analyzer 22.95 
Mortgage 14.95 
Space Intruders ("Best 
Game ot 1979"), 19,95 
Jury/Hostage 9.95 
Kentucky Derby/ 
Roulette ss 995 
Alien 1.0,/Tank 995 
‘Submarine Attack 9.95 
Battle of Midway 7.95 
Laser Tank Battle 995 
Swarm 14.95 
Baseball 995 
Super Startrek 14.95 
rT it nic PET Music Box + 29.95 
ility for errors in articles or advertisements. Opinions HR ee ee onsysten 
sesusdgatees 19.95 
Pearl Harbor Adventure 
14.95 


\ Super Gomoku 9.95 
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Relational Query System For Management ae 


REQUEST: 


DATABASES: You've Heard The Hype Before... 
The Truth IS... REQUEST DELIVERS! 


DATABASE MAINTENANCE— DATABASE SELECTION— DATABASE REPORTING— 
* Uses sophisticated screen formatting & data ¢ Uses screen masks to form query * Automatic headlines 
entry, like on IBM 3270's! * Provides extensive search capabilities * Automatic field editing 
* Generates it's own screens automatically! © Search arguments can include * Report fields can be calculated, sub-totaled & 
* Handles records up to 4K in length, using arithmetic/boolean functions, multi-field cross-footed in any manner desired. 
multiple screen “Pages”! comparisons * Optional counter breaks may be set 
* Automatic data compression for increased * Queries can generate input for automatic * Automatic grand totals 
disk capacity database maintenance * Automatic statistics 
© Uses Superkram (See below) access method * Queries can be stored in “Query Library" and 
for incredibly fast access, LESS THAN .2 executed from menu on demand REQUIREMENTS 


SECONDS FOR A RECORD! Any number of fields can be queried 


Superkram (see below) and: Commodore Pet 


* Automatic index creation/maintenance concurrently i 
* Automatic maintenance capabilities * Query output can be routed to disk, CRT Petey He febreartat tn doy 
* "Goof-Proof” error handling report formatter, VISICALC™ or SOURCE™ Pp pp! guage sy: 
and 2 disk drives or CORVUS. 
* Input can come from VISICALC™ or ONLY $225 
SOURCE™ 


Now With Multi-Key 
Capabilities 
. For Apple & Pet 


by Ken Germann 


Since KRAM™ was introduced in 1979 it has fast become knownas the quickest 
and most powerful access method for serious Apple and Pet users. Now, after 
hundreds of requests we have added MULTI-KEY, MULTI-INDEX, functions, 
as well as increasing processing speed. 


18M/370 users have VSAM (Virtual Storage Access Method) to KRAM™ 2.0 Regular Features 
gives Apple and Pet users the same flexibilty, substantially eileen 
Increasing the processing power of the Apple and Pet. hit record by Key. 


\dd & delete records by key 
* Get any record by Full/Partial key 


SUPER KRAM'S™ Added Features 


* MULTIKEY SUPPORT — Allowing simultaneous access to a 
KRAM file by more than one key field 

‘* HI-SPEEO READ — This feature allows increased 1/O speed upto 
60% faster during processing of SUPER KRAM read next, read 
previous, put and delete requests 

* IMPROVED INDEX ARCHITECTURE — Allowing faster index 


Until SUPER KRAM the only “random access” capability in the 
Apple and Pet consisted of a crude form of “relative record 


* Access by any key in as little as 2 sec. (.1 sec. with Corvus disk) searchers and more efficient disk space utilization 
processing. While this is usable for very simple applications, it falls ae fhe 5 
far short of the needs of today’s business and analytical £ Supports multiple disks * INTEGRATED BASIC COMMANDS — Allowing SUPER KRAM 
applications Using SUPER KRAM records may be processed by a OPM ER Stott tna thah Ghee belated A oat toes 
any one of multiple “Key” values, which may consist of any kind of § ; ee ‘ never 
data: numbers, letters, special characters, ete. Even Appless long «Dynamic space reclamation USER SPECIFIAGLE BUFFER ROL Alcwing te useto) 
awaited DOS 8.3 bear have anyining like thor \ynamic incex compression specity how many KRAM files are allowed open at one time: will 

* Files never need reorganization support any number of KRAM files 

‘+ Compatible with language systems + LOGICAL RECORDS (KEYS MAY BE NON-UNIQUE) — Records 

™ added to the KRAM files are immediately accessible by any of the 
KRAM™ 2.0 Only $99.95 ATTENTION-EXISTING KRAM USER: dotined keys for the file (Automatic Upgrade) 
Send $15 with original disk and ROM 10 United Software for improved version of Kram. + KRAM 20 files are totally compatible with SUPER KRAM 


SUPER KRAM™ Only $175 


= = UNITED Look for the RED-WHITE-BLUE 
= ==— — SOFTWA RE United Software Display at your local 
F 


computer dealer, or send check or 


KKK KK Kk kk kk kk kk kkk 


. moneyorder, plus $3.00 shipping to: 
750 3RD Avenue, AMERICA 
NGOS eae DEALER INQUIRIES INVITED 
PUTO NT TOE ee oats mica i Se idireat ited 2) 


AAMIDEK. Professional Color & B/W Monitors 


NEW 13” COLOR 


The Amdek 13” Color Video 
Monitor is ideal for all personal 
and business computing applica- 
tions. Bright jitter-free text allows 
viewing over extended periods 
without causing eye fatigue, 
especially in word processing 
applications. The low resolution 
display provides 40 characters 
wide by 24 characters deep with i 
260 horizontal lines and 300 ver- *sURUEY ane wails 
tical lines. ty 

This compact, lightweight te == ae 
monitor (only 25 Ibs.) has a 
molded-in carrying handle, 
making it easy to move. Its 
industrial grade construction and 
shatter resistant case provide 
reliable service in both office and 
industrial environments. All 
front mounted controls make 
it easily adjustable at a 
glance without the loss 
of a single keystroke. 


VIDEO 100 12” B/W MONITOR _ VIDEO 100-80 12” B/W MONITOR 


This highly reliable 12” black and white The model 80 features an industrial grade 
monitor features a 12MHz band width and metal cabinet with built-in disk mounting 
80 character by 24 line display. Plug-in com- capability and space for an 11” x 14” PC board 
patibility with Apple, Atari, Radio Shack, for custom designed electronics. Front 
OS.I., Microerm and Exidy make this the mounted controls include power, contrast, 
perfect text display for almost any system. horizontal hold, vertical hold, and brightness. 


Amdek Corp. ® 2420 E. Oakton Street, Suite E” * Arlington Heights, IL 60005 ¢ (312) 364-1180 TLX: 25-4786 


oe SES eel ck eS ee 
Amdek Corp. the new name for Leedex ... Expanding for the future, growing with success. 
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machine. One of the magazines (Micro) checked with 
us to see our feelings on such advertising. We in- 
dicated that we wouldn’t run such ads, given that the 
software in question could be used to produce 
duplicate copies of ‘‘protected’’ and proprietary soft- 
ware. We understand that Micro has since decided to 
do the same. 

We applaud this move toward protecting the 
rights of the software industry, and encourage addi- 
tional comment. 


The Rights Of The Buyer 


This isn’t intended to be an inclusive comment on 
the rights of software buyers, but an attempt to open 
discussion. I already know of one COMPUTE! 
Associate Editor who has definite feelings on the sub- 
ject. We'll try to get him involved in the discussion 
on these pages. 

The buyer of a copy-protected diskette has 
potential problems, and deserves to be protected as 
well. Vendors of software would remove the 
legitimate need for copying software if they would 
adopt a customer oriented, fully responsive plan for 
allowing licensed owners of software to quickly, con- 
veniently and most of all, economically, obtain a 
back-up in the case of failure of a diskette. 

The principal of repetitive back-ups is rightly 
embedded in the history of data processing tech- 
nique, and can’t be ignored in an industry rush to 
protect proprietary software from duplication. Per- 
sonal Software appears to be trying to deal with this 
with Visicalc, and I’m sure other vendors are as 
well. The vendor has the right to protect proprietary 
software. The vendor also has the obligation to pro- 
tect the customer’s interest. The extent of this protec- 
tion of the mutual interests of both will ultimately 
help define the existence of the protection violation 
market, and the strength of the software market as a 
whole. We’ll eagerly await your comments. 


The Boston Commodore Show; 

VIC Meets The Consumer 

Judging from the interest in VIC at Commodore’s 
Boston Show (February 6, 7), the $299.95 color com- 
puter entry from Commodore will be well received. 
One of the biggest unresolved problems of the 
moment is: ‘“‘When will production be up and run- 
ning?’’ They’re currently saying March-April, and I 
think they’ll make it. BASIC, by the way, is the 
well-known upgrade ROM set, and color animation 
capabilities are rather nice. We hope that Com- 
modore will see their way to a nice introductory 
package price. Watch our April issue for a full 
review of VIC, and mid-April for the availability of 
our brand new quarterly magazine, exclusively for 
the VIC. It’s called Home and Educational COM- 
PUTING!, and is announced elsewhere in this issue. 


Atari Update 


They’re still selling as fast as they can make them. 
What else can we say? © 


A Beginners 
Guide To 
COMPUTE! 


If you’re just getting started with your computer 
or with COMPUTE!, here are several notes to 
help you use COMPUTE!: 


Presentation 

In every issue we try to present a balanced 
group of articles ranging from material for 
beginners to material for old hands. Frequently, 
a beginner can get a great deal out of an ad- 
vanced article, even though much of it may be 
over his or her head. 

Program listings are presented as legibly as 
possible. Pet programs are generally reproduced 
and reformatted here where we’ve developed 
software to ‘‘translate’’ the special Pet graphics 
characters into characters printable by our 
equipment. These are explained below: 


Program Listings for COMPUTE 


Cursor control characters will appear in source listings 
as shown below: 


h=HOME , 
Y=DOWN CURSOR , T=UP CURSOR 

>=RIGHT CURSOR, <=LEFT CURSOR 
L=REVERSE , E=REVERSE OFF 


R=CLEAR SCREEN 


Graphics (i.e. shifted) characters will appear as the 
unshifted alphanumeric character with an underline. 
This does not apply to the cursor control characters. 
The Spinwriter thimble doesn’t have a backarrow 
symbol, so a ‘‘~’’ is used instead. 

The ‘4’ is used to indicate the beginning of a 
continuation line. It is also used to indicate the end 
of a line which ends with a space. This prevents any 
spaces from being hidden. 


If, for example, you’re an Apple owner using a 

Pet program that’s reproduced in this fashion, 

you'll need to be familiar with these special 
characters so you can program around them. As 
more computers implement versions of 

MicroSoft BASIC, the programs should become 

more and more transportable. 1o} 


Reader’s Feedback will return next issue in a revised and 
expanded format. Keep those letters and editor’s feedback 
cards coming. By the way, see our New Products section, 
new this issue. RCL 
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A 6502 Version Of The 


Winter 
Consumer 
Electronics 
Show: 
January, 1981 


David D. Thornburg 
INNovision 

P.O. Box 1317 

Los Altos, CA 94022 


At a time when most normal folks are taking down 
the holiday decorations, and preparing for the new 
year, those of us who haunt the trade shows were 
anxiously preparing for our January fix — the 
Winter CES (Consumer Electronics Show) held in 
Las Vegas. Unlike specialized trade shows, like 
Comdex, the CES has exhibits covering almost all 
consumer products that are likely to contain silicon. 
Because of the continuing recession, only 55,000 
people attended this show which was held in the Las 
Vegas Convention Center and in two nearby hotels. 
Rather than describe some of the more novel pro- 
ducts, such as the talking microwave oven (with, 
would you believe it, a Japanese-English accent), or 
the solar rechargeable flashlight (look, I couldn’t 
make this stuff up if I tried, so believe me!), I de- 
cided to mention some of the products of greater 
relevance to COMPUTE! readers: the 6502-based 
microcomputers which were displayed. 

As far as hardware is concerned, the big hit of 
the show was the Commodore VIC-20 (your fearless 
scribe is preparing a review of this machine to appear 
in a forthcoming issue of COMPUTE!). At a suggested 
retail price of $299, it is apparent to me that Com- 
modore has the technical ability to give the Radio 
Shack Color Computer a solid run for its money. In 
fact, I expect VIC sales to place Commodore firmly 
in the number two spot for total machine placements, 
and perhaps to even edge up on our Texas friends. 
The styling is beautiful and the price is right, but 
even more importantly, Commodore is going all out 
to support the cottage industry that has kept the PET 
well supplied with software. Watch for the FOC ap- 
proval, followed by the VIC showing up in your cor- 
ner computer store sometime in March or April. 


Software had its day at CES also. Atari showed 
both their new PILOT cartridge (see this month’s 
Computers and Society column), and also showed 
their word processor package. Both pieces of soft- 
ware are very well done, and should do much to help 
Atari on its accelerating growth curve. While I didn’t 
see any new Atari hardware on the floor, there were 
rumors of some nice new things hidden away in their 
hospitality suite. It is apparent that Atari is in this 
game for the long haul. 

Those of you who are waiting for the keyboard 
portion of the Mattel Intellivision (complete with a 
6502-based computer with 16 K of RAM and a 
Microsoft BASIC) will have to wait a little longer. 
Once again they say that deliveries will begin in 
March — only the year has changed. 

The absence of Apple and OSI from this show 
was noted. Apple has apparently decided to focus its 
efforts in the small business market, and leave the 
home computer market to fend for itself for awhile. I 
saw lots of Apple folks at the show, however, so they 
can’t have totally lost interest in the consumer 


For those of us who have 
invested in 6502-based systems, 
it is heartening to see that this 
processor continues to be among 
the most popular. 


market. OSI, on the other hand, has had nice ex- 
hibits at this show for quite some time, and I have to 
assume (without checking it out) that their absence 
was due more to their recent acquisition than to any 
plans they have to depart from the low-end market. 

The 6502-based hand held computer from 
Matsushita (which will be marketed both through 
Panasonic and Quasar) was shown running a com- 
munications interface hooked up to the Source. It ap- 
pears that the software for this computer is almost 
finished, and that we can expect to see it hit the 
market in a few months. Considering that this com- 
puter, with modem and coupler, will have a retail 
price in the $1,000 range, I find its small keyboard 
and one-line liquid crystal display to be annoying. 
On the other hand, if you want the ultimate in por- 
tability, this might be just the computer for you. 

It was interesting to note that all the other com- 
puters at the CES (excepting the TI 99/4) used either 
the 8080 or Z-80 microprocessor. There were no new 
16-bit computers introduced. For those of us who 
have invested in 6502-based systems, it is heartening 
to see that this processor continues to be among the 
most popular. It is clear that our investment will re- 
tain its value for quite some time. 
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IN 1981... 
DO IT THE EASY WAY! 


with the 


TAX PREPARER 


by HowardSoft™ 


Easy-to-use features with complete professional 
results: 


® All schedules (A, B, C, D, E, F, G, R&RP, SE, TC) 

© Many forms (1040, 2210, 2106, 3468, 4562, 4726, 
4797, 5695) 

© IRS-accepted format for direct filing of print-outs 

* On-screen preparation using facsimile of IRS forms 


e ee record-keeping and building of itemized 
iles 


© Numerous tax alternatives easily analyzed 


© Files for numerous taxpayers easily compiled 


and edited 
© Fully compatible with all printers 


© Use with or without line printer 
© Use with or without two disk drives 


© Includes full documentation, sample returns, 
and two disks (program disk and storage disk) 


Available at your dealer for $99 
(suggested retail) 


(Z204 
oN 2 | Howard Software Services 
... for the SERIOUS Personal Computer User 
7722 Hostord Ave. | Los Angeles.CA 90045 | (213) 645-4069 
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The Beginner's 
Pal g e Robert Lock, 


Editor/Publisher 
COMPUTE! is a specialized resource magazine that 
provides editorial coverage of a family of micro- 
computers that share a common ‘‘central processing”’ 
chip — the 6502. With the proliferation of small 
computers, we find that you can obtain more useful 
and relevant information in a magazine that doesn’t 
(for example) cover the TRS-80 computer line. It, by 
the way, uses a different microprocessor chip: the 
Z-80. A whole different family of chips, and a dif- 
ferent family of machines. 


Mapping COMPUTE! 

We're organized sequentially, with the front section 
of the magazine devoted to material of general in- 
terest and utility. The following sections are devoted 
to specific machines. These are called Gazettes, and 
contain information pertinent to your special 
machine. Frequently, however, you’ll find useful 
material in other sections (Gazettes) of the magazine. 


Where The Sets Merge, Or Common Interests 
All of your machines have available a programming 
language called BASIC. BASIC stands for Beginners 
All-purpose Symbolic Instruction Code. It’s what is 
called a higher-level language. BASIC differs 
somewhat on the different machines, so you'll find 
some things in common with other BASIC’s and 
some differences. In practice, BASIC simply makes it 
easier for you to talk to your 6502 microprocessor. 
The 6502 sits at the heart of your machine. It and 
supporting ‘‘firmware’’ and ‘‘hardware’’ make your 
machine capable of doing what it does. In a nutshell, 
you feed your 6502 instructions that it can act on. It 
only acts on very picky little sets of numbers, and 
that’s why you have BASIC. BASIC serves as an 
English-language like translator for you, taking your 
instructions in a pseudo-English format and 
translating them for the 6502. 

Other portions of firmware contribute to your 
machine’s features. Someone has already written a 
6502 program that resides in your machine, inter- 
acting with BASIC, and passing out instructions to 
the 6502. This program (or set of programs) is called 
the Operating System. It is permanently inscribed 
onto a chip or set of chips inside your machine. Its 
permanence implies its generic name: firmware. 
Hardware characteristics also help define your 
machine and its capabilities. Memory is one impor- 
tant characteristic. Memory is your working space. 
It’s much like the work area you have on top of your 
table. Let’s assume you have a table of x size, and 
you’re ready to start a project. You have a set of 
notes and instructions previously developed to help 
you with your task. Let’s also assume that you may 


not write on your previous notes, but you may refer 
to and use ther freely. These notes and instructions 
are much like one kind of memory in your computer: 
ROM. Read Only Memory is memory that has a 
program alreacly saved on it. The program doesn’t 
go away when you turn your machine on and off. 
This, then, is your firmware: the ROM, or set of 
ROMs, where ‘‘permanent’’ programs, or sets of in- 
structions, reside. The number of instructions your 
Operating System can have, e.g. in part its complex- 
ity, is then directly related to the amount of ROM in 
your machine. Let’s stack up these beginning 
“‘notes’’ on one side of your desktop. We'll assume 
that they take up one-quarter of the table space. We 
can use them always, but we can’t stack anything 
else there. 

Now let’s add a clean notepad to our workspace. 
We'll call this our work area. Everytime we come 
back to our desk to work, we’ll assume we have x 
amount of clean space to put our notepad on, and do 
whatever work we want. This ‘‘flexible’’ work area 
equates to RAM. Random Access Memory is 
another type of memory inside your computer. 
Unlike ROM, which has a set of instructions ‘‘built- 
in’’, RAM is empty. It’s your working area; the 
space you use for putting in your own information. 
After you put something in it, you can use it, 
reading from it later, and so on, just like your note 
pad. And like your notepad, you can continue to 
return to it, reading from it and writing to it. Until, 
of course, you turn your computer off. Your RAM is 
wiped clean when the power goes away. 

Storage Media 

This is why your computer has a storage device. 
Whether it’s a tape cassette or a disk drive, it’s there 
to save the contents of your RAM. Let’s assume 
you’ve entered a set of instructions. We know where 
they are: they’re in RAM. We also know that once 
the machine is turned off, these instructions will be 
erased from RAM. The solution is simple. Save 
them somewhere. When you want them back, your 
Operating System will take care of reading them 
back into RAM. 


Where Are We? 

We’ ve just covered the areas that make your small 
computer a truly remarkable and powerful device. It 
has a set of predefined features, controlled by perma- 
nent instructions, and aided by design features that 
always make it ‘‘act’’ the same way. Your calculator 
is much like this; and your microwave oven; and the 
host of other consumer products that are utilizing 
some form of microprocessor chip. The firmware in 
these devices is simply a set of permanent instruc- 
tions to a computer chip. But your computer has a 
whole lot more. It has RAM, allowing you work 
space to develop your own sets of instructions to your 
computer chip. Aha! Tremendous flexibility. And it 
has a storage device, allowing you to save the effort 
of your labors, retrieving them at will for use and 
further development. © 


Osborne Polishes 
THE APPLE 


The Apple Il 
User's 
Guide 


The Apple II 


User’s 


The Apple Il 
User's 
Guide 


and Publ 


ishes 


THE GUIDE 


The Apple I! User’s Guide by Lon Poole, Martin McNiff, and Steven Cook #46-2, $15.0 


This Guide is the key to unlocking the full power of your Apple II or Apple !I plus computer. The Apple ll User's Guide brings together in one place 
a wealth of information for Apple computer users. It will tell you more about your Apple than any other single source. 

Topics include: Applesoft and Integer BASIC programming - especially how to make the best use of Apple's sound, color and graphics 
capabilities. The book presents a thorough description of every BASIC statement, command and function. Machine level programming - 
although not a machine language programming guide, this book covers the Machine Language Monitor in detail. Hardware features - the disk 
drive and printer are covered in separate chapters. Advanced programming - special sections describe high resolution graphics techniques 
and other advanced applications. 

This book will save you both time and effort. No longer will you have to search endlessly for useful information. It’s all here, inthe Apple ll User's 


Guide, thoughtfully organized and easy to use. 


More Osborne Books for Apple Users 


6502 

Assembly Language 
Programming 

by Lance Leventhal 


Here's the book that shows you how to 
program the Apple in assembly language. 
"With its numerous reference tables, ex- 
planations and descriptions, this bookisa 
major accomplishment, It's by far the 
most complete 6502 book to appear 
Make space on your bookshelf. You'll 
want to keep this one handy.” 

COMPUTE 
Book #27-6 $16.99, 606 pp. 0 


Make check payable to: 


Some Common BASIC 
Programs 

by L. Poole and M. Borchers 
Written in a subset of standard BASIC that 
is compatible with many microcomputers, 
this book contains 76 useful and easy-to- 
use programs. The book explains how 
each program works, shows sample runs, 
and has program listings with remarks, “If 
you want to do mathematics or statistical 
programming on your computer, this book 
is a must.” ON COMPUTING Magazine 


Book #06-3, $14.99, 200 pp. 


AY OSBORNE/McGraw-Hill 


630 Bancroft Way, Berkeley, CA 94710 Dept. G4 


Name 


*Apple is a trademark of the Apple Computer Corporation 


Practical Basic Programs 
edited by Lon Poole 


Here's a collection of 40 programs you 
can easily key in and use on most micro- 
computers. Practical Basic Programs is 
especially useful in small business appli- 
cations. It solves problems in finance, 
management, and statistics. The book 
Contains sample runs, practical problems, 
BASIC source listings, and an easy-to- 
follow narrative to help you realize the 
potential uses of each program. 


Book #38-1, $15.99, 200 pp. 0 


zi 
wnt 
An Introduction to a 
Microcomputers 
Volume | - Basic Concepts 
Second Edition 
by Adam Osborne 
The world’s best selling textbook on 
microcomputers develops a detailed pic- 
ture of what a microcomputer cando, how 
it does what it does, and how it can be 
used in any practical environment. This 
is the most comprehensive and up-to- 
date introduction to microprocessor 
systems available anywhere. 
Book #34-9, $12.99, 320 pp O 


Phone Orders: (415) 548-2805 or Toll Free 800-227-2895 


Address 


City/State/Zip 


Plus 0 .75/item 4th class 0 $1,25/item UPS O $2.50/item Air Mail 0 $4.00/item Overseas (California residents add applicable tax.) 


Total Amount Enclosed $ 
Signature 


or charge my O VISA O Mastercharge 


Card # 


Exp, Date 


O Please send me your free catalog 
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Computers 
and Society 


David D. Thorntourg 
INnovision 
P.O. Box 1317, Los Altos, CA 94022 


As R. Buckminster Fuller is fond of pointing out, 
synergy is the behavior of whole systems which is not 
predicted by the behavior of the parts taken sepa- 
rately. There have been two recent developments in 
the personal computer world which, taken together, 
have the promise of true synergism. These events are 
the publication of Seymour Papert’s long-awaited 
book: Mindstorms - Children, Computers, and 
Powerful Ideas (Basic Books), and the introduction 
of the language PILOT for the Atari computers. 

Since this year’s theme is communications, it is 
only appropriate that we spend some time looking at 
the communication between the user and the com- 
puter. While the mechanical means through which 
this communication takes place are worthy of exten- 
sive discussion, I want to concentrate this month on 
the nature of the language through which we interact 
with computers, since this also is an area of intense 
importance. 

One might argue that there is little reason for 
concern with computer languages at this point, since 
we all have access to fairly powerful versions of 
BASIC on our computers. We might all agree that 
BASIC is not terribly hard to learn, and that there 
are lots of very exciting BASIC programs, and even 
that BASIC has become the de facto standard com- 
puter language for personal computers. 

But even with the tremendous penetration of 
BASIC in the marketplace, I have yet to find any 
serious computer user (regardless of age) who really 
likes it. At the primitive level of programming at 
which we all start, BASIC works pretty well. But as 
we get more sophisticated, most of us find ourselves 
writing code that we can’t understand two weeks 
after we write it. 

Of course, there are detractors of BASIC who 
feel that languages like PASCAL are the solution. I 
must confess that I find PASCAL lacking in that it 
doesn’t encourage the user to sit down and start 
writing some small part of a program, to play with 
the bits and pieces, and to then bring everything 
together later on. This is one area in which BASIC 
excels. For those who feel that people should be 
organized when they write a program, PASCAL 
(and C and other ‘‘serious’’ languages) may very 
well be the best choice. But what about the new com- 
puter user who wants to build a highly interactive 
program, or the child who wants to explore concepts 
in geometry through the experience of programming 


rather than through playing a pre-defined ‘‘game’’ or 
sitting at a ‘‘canned’’ CAI lesson? These people need 
languages which are interactive, highly flexible, 
extraordinarily powerful, and are easy to get started 
with. 


LOGO And PILOT Are Two Such Languages. 
While LOGO (as this is being written) does not yet 
exist on commercial personal computers, it has been 
the subject of an extensive research program at MIT 
for more than a decade. Much of the research has 
been devoted less to the development of computer 
languages per se, than to the development of a com- 
puter assisted learning environment for children. The 


...for some educators, Computer 
Aided Instruction has come to mean 
“computers programming children”. 


goals, aspirations and results of this work are the 
subject of Papert’s Mindstorms. It is hard to im- 
agine any person who is intensely concerned with the 
use of computers by children who would fail to be 
moved by the sweeping vision implicit in Papert’s 
work. Writing from the perspective of a mathemeti- 
cian who spent much time with Jean Paiget, Papert 
presents a variation on the Paigetian model of the 
“child as builder’’ in that he sees the need for 
children to have an abundance of materials with 
which to build things. 

That the computer can be one such building tool 
is the cornerstone of the many computer literacy ac- 
tivities we see springing up around the world. But, 
for some educators, Computer Aided Instruction 
(CAI) has come to mean ‘‘computers programming 
children’’. There is much to be gained from revers- 
ing this process — and that is where the need arises 
for an exceptionally powerful (and easy to learn) 
computer language. 

LOGO is a highly interactive language which 
contains a graphics environment containing 
something called a ‘‘Turtle’’. The Turtle is a non- 
Euclidian point (having both position and direction, 
rather than a position alone). The programmer can 
send messages to the Turtle which cause pictures to 
be drawn on the display screen. Those of you who 
are familiar with the Milton Bradley Big Trak are 
already familiar with this idea. To draw a square on 
the screen, for example, a child working in the 
Turtle microworld might type: 

FORWARD 100 
RIGHT 90 
FORWARD 100 
RIGHT 90 
FORWARD 100 
RIGHT 90 
FORWARD 100 
RIGHT 90 
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HAVE WE 
GOT A PROGRAM 
FOR YOU IN 'SI 


Attend the biggest public computer shows in the country. 
Each show has 100,000 square feet of display space fea- 
turing over 50 Million Dollars worth of software and hard- 

ware for business, industry, government, education, home 
and personal use. 
You'll see computers costing $150 to $250,000 including 
mini and micro computers, software, graphics, data and word 
processing equipment, telecommunications, office machines, 
electronic typewriters, peripheral equipment, supplies and com- 
puter services. 
All the major names are there including; IBM, Wang, DEC, 
Xerox, Burroughs, Data General, Qantel, Nixdorf, NEC, Radio 
Shack, Heathkit, Apple, RCA, Vector Graphic, and Commo- 
dore Pet. Plus, computerized video games, robots, com- 
puter art, electronic gadgetry, and computer music to 
entertain, enthrall and educate kids, spouses and peo- 
ple who don't know a program from a memory disk. 


Don't miss the Coming Of The New Computers— 
} Show Up For The Show that mixes business with 
‘ pleasure. Admission is $5 for adults and $2 for chil- 
i dren under 12 when accompanied by an adult. 


iy i DALLAS CHICAGO 
Ticket Inf 4 

oe onan Dallas Market Hall McCormick Place 
Send $5 per person with the name of the show 2200 STEMMONS cRWY SCHOESSLING HALL 
you will attend to National Computer Shows, T IN 
824 Boylston Street, Chestnut Hill, Mass. 02167 ADINDUS TRAC BED 29RD &'THE LAKE 
Tel. 617 739 2000. Tickets can also be purchased THURS-SUN THURS-SUN 
at the show APRIL 9-12 SEPTEMBER 10-13 


10 AMTO7 PM 10 AMTO7 PM 


WASHINGTON, DC BOSTON ATLANTA 
DC Armory/Starplex Hynes Auditorium Atlanta Civic Center 
2001 E. CAPITOL ST, SE PRUDENTIAL CENTER 395 PIEDMONT AVE NE AT 
(E CAP ST EXIT OFF 1295 THURS-SUN RALPH McGILL BLVD 
— KENILWORTH FRWY) OCTOBER 15-18 THURS-SUN 
ACROSS FROM RFK STADIUM 10 AMTO7PM OCTOBER 29-NOVEMBER 1 
THURS-SUN 10 AMTO7 PM 
SEPTEMBER 24-27 
10 AMTO7 PM 
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As each instruction is executed, the Turtle first 
moves forward by 100 units, and then turns right by 
90 degrees, drawing its path on the screen as it 
moves. The desired square thus takes shape on the 
screen. A programmer wishing to use squares quite 
frequently might wish to extend the repetoire of com- 


...children are asked to find 
the bug by “playing Turtle”. 


mands the Turtle uses by defining a new procedure 
which the Turtle then ‘‘understands’’ 
TO SQUARE 
REPEAT 4 
FORWARD 100 
RIGHT 90 
END 
If squares of arbitrary size are required, one might 
write: 
TO SQUARE :SIZE 
REPEAT 4 
FORWARD :SIZE 
RIGHT 90 
END 
and then, anytime a square is desired, one would 
type, for example, 
SQUARE 47 


to draw a square with each side 47 units long. 
The value of using the Turtle environment in an 
interactive way is expressed by Papert this way: 
Working in Turtle microworlds is a model for what 
it is to get to know an idea the way you know a per- 
son. Students who work in these environments certainly 
do discover facts, make propositional generalizations, 
and learn skills. But the primary learning experience is 
not one of memorizing facts or of practicing skills. 
Rather, it is getting to know the Turtle, exploring what 
a Turtle can and cannot do. It is similar to the child’s 
every day activities, such as making mudpies and testing 
the limits of parental authority — all of which have a 
component of ‘‘getting to know”? 
One of the more valuable experiences for children in- 
volved with computers is learning how to ‘‘debug’’ a 
program with errors in it. Traditionally, we are 
taught that errors are bad. Papert shows that, by ac- 
cepting the inevitability of errors in programs, 
children can learn to analyze the results of the error 
and then learn to avoid the error in the future, and 
to ‘‘patch”’ it in the meantime. 
In order to make the debugging process as 
meaningful as possible, children are asked to find the 


The ATARI® Tutorial 


COMPUTER 
Calligraphy? 


Well, not really! But with the FONTEDIT program in IRIDIS #2 
you can design your own character sets (or fonts) for the 
ATARI. For example, you can create a Russian alphabet, or 
APL characters, or even special-purpose graphics symbols 
These special fonts can be saved on disk or tape for later use 
by your programs. FONTEDIT is a friendly, easy-to-use 
program: just grab a joystick and start designing. 


SDIT FONTEDIT FIN TE OTF 


FON 


With our KNOTWORK program, you can design patterns of 
Celtic interlace, (a technique used by 7th century Irish monks 
to illuminate manuscripts). After you have produced a pretty 
pattern on the screen of your ATARI, you can save it on disk or 
tape. As you might expect, KNOTWORK uses custom graphics 
characters that were created with FONTEDIT. 


Ss 


FONTEDIT and KNOTWORK are available now in IRIDIS 
#2, the second of our ATARI tutorial program packages. 
You get a C-30 cassette or an ATARI diskette with our 
excellent programs ready to load into yourATARI Best of 
all, IRIDIS #2 comes with a 48-page User's Guide, which 
gives clear instructions on how to use the programs.The 
Guide also provides detailed, line-by-line descriptions 

of how the programs work.(IRIDIS programs are written to 
be studied as well as used.) Our Hacker's Delight column 
important PEEK and POKE locations in explains many 
your ATARI. 


The User's Guide also includes Novice Notes for the 
absolute beginner.We don't talk down to you,but we do 
remember how it feels to be awash in a sea of bytes 
and bits and other technical jargon. If you are new to 
programming, IRIDIS is one of the easiest ways you can 
learn how to get the most out of your ATARI. If you arean 
old hand, you'll be delighted by the technical excellence 
of our programs. (We are the people who have published 
CURSOR for the Commodore PET since July, 1978.) 


ORDER FORM Published BY ~The Code 
IRIDIS #2 - Fontedt and Knotwork 

DO sisa5Canetle 1 $1895 Disk Box 550 Works 
IRIDIS #1 - Clock, Zap, L Polygons: Goleta, CA 93116 

#1 Closk, Zap, Loge, Pol 

OD $9.95 Cassette D $12.95 Disk 805-683-1585 


Dealer Inquiries Invited. 
Name 


City : —— zip 
O Visa D MC Card No 


Expires _ __ Signature 


IRIDIS requires 16k tor cassette 


bug by ‘“‘playing Turtle’. The child then walks 
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INTRODUCING 
COGNIVOX Series VIO-1000 
A Revolutionary New 
Voice Input and Output Peripheral 


High Fidelity Voice Response 
Industrial Quality Recognition 


PET — AIM-65 — APPLE II 


COGNIVOX series VIO-1000 is a top-of-the-line voice 1/O 
peripheral for business and educational applications and the 
demanding hobbyist 


It can be trained to recognize words or short phrases drawn 
from a vocabulary of 32 entries chosen by the user. It will talk 
back with up to 32 words or short phrases, In disk based systems, 
response vocabularies can be stored on the disk and brought to 
memory as needed, giving an effectively unlimited number of 
vocabular y entries. The quality of voice response is excellent, 
and it is far superior to that of speech synthesizers 


COGNIVOX series 1000 comes complete and ready to plug 
into your computer (the computer must have at least 16K of 
RAM). It connects to the parallel |/O port of the PET, to the game 
paddle connector on the Apple and to the J1 port on the AIM-65. 
Connectors are included as required. Also included are a 
microphone, cassette with software and extensive user manual 
A built-in speaker/amplifier is provided as well as a jack for 
connecting an external speaker or amplifier 


Software supplied with COGNIVOX includes two voice 
operated, talking video games, VOTH and VOICETRAP. These 
games are absolutely captivating to play, and the only voice 
Operated talking games that are commercially available 


Adding voice |/O to your own programs is very simple. A single 
statement in BASIC is all that is required to say or to recognize a 
word. Complete instructions on how to do it are provided in the 
manual. 


In keeping with the VOICETEK tradition of high performance at 
affordable price, we have priced COGNIVOX series 1000 at the 
unbelievably low, introductory price of $249 (plus $5 shipping in 
the US, CA add 6% tax. Foreign orders welcome, add 10% for 
handling and shipping via AIR MAIL). When ordering, please give 
the make and model of your computer, the amount of RAM and 
whether you have disks or not 


In addition to COGNIVOX series VIO-1000, VOICETEK 
manufactures a complete line of voice |/O peripherals for most 
of the popular personal computers. Speech recognition-only 
peripherals are available for the 8K PET and the 4K AIM. 


For more information call us at 805-685-1854 or write at the 
address below. 


Dealer Inquiries invited. 


VOICETE 


Dept A, P.O. Box 388 
Goleta, CA 93116 


around the floor, executing each instruction in turn 
until the ‘‘faulty’’ instruction is found. But doesn’t 
this method for finding errors lead the child to 
“thinking like the computer’’? Papert sees this ex- 
perience in a larger context. He says: 
In my experience, the fact that I ask myself to “‘think 
like a computer’’ does not close off other epistemologies. 
It simply opens new ways for approaching thinking. 
The cultural assimilation of the computer presence will 
give rise to computer literacy. This phrase is often taken 
as meaning knowing how to program, or knowing about 
the varied uses made of computers. But true computer 
literacy is not just knowing how to make use of com- 
puters and computational ideas. It is knowing when it 
is appropriate to do so. 
While Papert is quite heartened by the growth of the 
personal computer industry, since this growth will 


He likens BASIC to the QWERTY 
layout on the keyboard—an 
artifact from a time when 
better things didn’t exist. 


result in children having ever easier access to com- 
puters, he is frustrated by the limitations of these 
machines and by the extremely strong penetration of 
BASIC into the marketplace. He likens BASIC to the 
QWERTY layout on the keyboard — an artifact 
from a time when better ways didn’t exist. But what 
of LOGO itself? This language will not be forever 
locked in the University laboratory. Versions for the 
TI 99/4 and the Apple computer will probably come 
into general availability soon. 

Even if LOGO, with all its power, doesn’t make 
its appearance in the marketplace soon, I feel that 
many of Papert’s ideas can be implemented today on 
the small computers whose capabilities he dislikes, 
through the medium of the language PILOT. 

As normally written, PILOT interpreters allow 
the user to create spectacular text manipulation pro- 
grams (c.f., the article by Thornburg and Thornburg 
in the first issue of COMPUTE!). Recent 
embellishments have made PILOT a splendid 
language to use on computers with high quality 
graphics environments, such as the Atari 400 and 
800. Those of us who use Atari computers can, with 
Atari PILOT, do many of the things Papert does 
with LOGO. 

Those of you who are familiar with PILOT pro- 
bably think of it as a language best suited for 
creating text-based learning materials. My view of 
the language is far more open than that, because it is 
so easy to teach to youngsters. It has long been my 
dream to see the superb text manipulative power of 
PILOT extended to give the user similar power to 
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create pictures. The Atari PILOT is the answer to 
this dream since it contains a graphics package that 
is, in some ways, very similar to the Turtle graphics 
of LOGO. 

For example, an Atari computer user running 
PILOT might draw a square this way: 
GR: CLEAR 
GR: DRAW 25 
GR: TURN 90 
GR: DRAW 25 
GR: TURN 90 
GR: DRAW 25 
GR: TURN 90 
GR: DRAW 25 
GR: TURN 90 
As each instruction is carried out, the square begins 
to take shape on the screen. If the user wants to 
draw lots of squares PILOT allows one to create a 
“‘module’’ as a deferred program. By typing AUTO 
at the command level, and then typing: 
*SQUARE 

GR: 4(DRAW 25; TURN 90) 

E: 


A module (SQUARE) is created. On leaving the 
AUTO mode (the AUTO mode automatically places 
line numbers in front of each statement, thus keeping 
them from being executed immediately), the user can 
draw a square by typing: 

U: *SQUARE 


in which U: is the USE operator found in all versions 
of PILOT. 


My reasons for giving this particular example 
are two-fold. First, it shows the similarity between 
the Turtle graphics of Atari PILOT and that of 
LOGO. Secondly, it shows that PILOT can be used 
in an interactive mode which combines deferred pro- 
gram segments (modules) with immediate execution 
of commands. 


Can (or should) PILOT replace BASIC? I can 
only answer by saying that, on the Atari computers, 
it has for me. I find the language much easier to 
learn, much easier to use, and capable of doing 
anything I have ever wanted to do. One of its major 
features (especially important when working with 
children) is that a PILOT program can be read by 
someone other than its author. This is rarely the case 
for large BASIC programs. 


Finally, while most users will want to use 
PILOT to write self contained programs, I am very 
happy with the fact that the Atari implementation of 
PILOT allows the user to interact with the language 
without having to write ‘‘finished’’ programs. As 
Papert has shown, the value of ‘‘playing around”’ 
with an interactive language can be great for all 
users, and especially for children. © 


Editor’s Note: Atari PILOT is not expected to be available 
until late spring. Check with your dealer for more informa- 
tion. RCL 


Apple Disk Fixer 


13 OR 16 SECTOR 


If you care enough to back up critical programs and files, Disk 
Fixer™will give additional peace of mind. This powerful utility 
for experienced Apple users is a toolkit for manipulating, repair- 
ing, and protecting all data on disk. 

Use the high-speed full screen editor to examine and easily 
change any portion of a disk, correct space usage within files, 
and save money by locking out bad tracks on disks. Directories 
are alphabetized, if you choose. 

The display and search capabilities show where specific HEX 
or ASCil data is located and you can modify any data including 
binary files. DOS 3.2, DOS 3.3 & LANGUAGE SYSTEM DISK 

Written by Jeffrey P. Garbers 
©1980 The Image Producers, Inc., All Rights Reserved 
615 Academy Drive 
PUTER Northbrook, TL 60062 
312/564-5060 


CURE TO 
SOFTWARE 
PROBLEMS 


PROFESSIONAL SOFTWARE 


Medical, Dental & Legal Systems, 
Accounting & Financial, Educational, 
Word Processing, Office Management 


Check your Local Dealer or Contact: 


Charles Mann & Associates 

7594 San Remo Trail 
Yucca Valley, Ca. 92284 
(714) 365-9718 


TRS-80 TI 99/4 
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INTRODUCING 
THE NEW IMPROVED 


BUSINESS ENHANCEMENTS 
COMPUSERVICE BUSINESS 
SOFTWARE 


FOR 


COMMODORE 


Micro Mini Computer World Inc. is an execlu- 


sive distributor for the BUSINESS SOFT- 

WARE developed by Business Enhance- APPI | AD 
business software for the 

COMP l I ER COMMODORE and APPLE com- 


ments Compuservice of Escondido, 
California. 


If you are selling or using the 
COMMODORE BUSINESS MACH- 


B.E.C. VALUE ADDED 
BENEFITS e Total commit- 


ment to the development of excellent 


puter systems. 
e OK reasonable rates Micro Mini 


INES or the APPLE computer systems, SYSTEMS Computer World Inc. will provide 


then you should provide yourself and your 
customers with the MOST COST EFFECTIVE and 
COMPREHENSIVE business software for a busi- 
ness computer system. 


CURRENT B.E.C. SOFTWARE 

e@ General Ledger--Master File 1000 Accounts 
and Journal File 4400 Entries 

e@ Accounts Receivable--Master File 1170 
Accounts and Invoice File 1430 Entries 

e@ Accounts Payable--Master File 1170 and 
Invoice File 1430 Entries 

@ Payroll--440 Employees 

@ Job Costing--1100 Items Per Disk 

e@ Inventory--1100 Items Per Disk 

@ Mail List/Customer Information--1000 


Entries Per Disk 
Above figures apply to CBM 2001 computer 


system with 32K CPU and 2040 dual disk. 
With the new CBM 8050 Megabyte disk the 
volumes will be increased significantly. 


B.E.C. SOFTWARE FEATURES: 

@ Complete and total documentation 

@ Step by step walk through on every pro- 
gram operation, with examples 

@ Each package is MENU driven and uses 
dynamic load and overlay once the initial 
menu is loaded. 

@ Examples are provided for all reports and 
other printed forms. All forms are available 


from New England Business Services Inc. (NEBS). 


@ All input/output operations use random access 

@ Sorts are machine language sorts 

@ Programs are interactive with the General 
Ledger and update the GL automatically. 


software modifications to meet customer require 
ments. (Call MMCWI for further information) 

e@ EXTENDED WARRANTY which entitles 
users to any enhancements to accounting 
software during the year of coverage. 

(Cost is $100 per year) 


Dealers and Interested Parties may obtain a 
copy of the B.E.C. software documentation for 
$25. If after review you are not interested, 
send the documentation back, in re-saleable 
condition, for a full refund or apply the 

$25 toward your first software purchase. 


The NEW B.E.C. BUSINESS SOFTWARE 
requires a special ROM chip for proper 
operation. 


Suggested Retail Prices are: 
1. Rom chip $70 (required on any software 
package) 
2. Individual software package $150 
3. All seven software packages $995 (save 
$55) 


DEALER INQUIRIES ARE INVITED 


micro COMPUTER WORLD inc. 


o 
* Country snoPPIn® 
74 ROBINWOOD AVE. COLUMBUS, OHIO 43213 


(614) 235-5813 (614) 235-6058 
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Editor’s Note: Although Richard refers to the PET in this 
overview, I recommend this article to all who've expressed in- 
terest in machine language. RCL 


Taking the 
Plunge— 
Machine 
Language 
Programming 
for Beginners 


Richard Mansfield 

Philipsburg, PA 

If you have been using BASIC for a while now, you 
can probably go in and out of STR$ and VAL and 
there is no mystery to ON GOTO anymore. In fact, 
the only strange BASIC statements at this point are 
USR, SYS, and PEEK and POKE. They are 
gateways into Machine Language and that is still an 
unknown area. Take heart. It is said that people who 
first learned programming using Machine Language 
(M.L.) can find BASIC confusing. 

In this article I will discuss aspects of M.L. pro- 
gramming which were unclear or difficult for me 
when I went on to learn M.L. after a fairly complete 
grasp of BASIC. I had seen ‘‘assembler listings’ in 
magazines with their usual warning that the numbers 
must be entered exactly or the program could not 
work. And the numbers themselves were in HEX—7 
and 10 was 0A! It seemed difficult: It really isn’t 
that hard (but try to explain to a non-computerist 
that BASIC isn’t that hard). 

The first thing to do is to get a good book on 
6502 (our computers’ CPU chip) programming. 
There are five or so, but among the best are ‘‘Pro- 
gramming the 6502’’ by R. Zaks (Sybex) and ‘6502 
Assembly Language Programming’’ by Lance Leventhal 
(Osborne). You can ignore such information as 
signed binary, floating point, octal, hardware and 
input-output chapters. What you want to learn is the 


meaning of hexadecimal and binary — two new ways 
to express numbers. 

“Machine Language’’ means that you are enter- 
ing statements in exactly the way that your 6502 pro- 
cessor will see them. By contrast, a BASIC statement 
such as LOAD represents hundreds of M.L. 
statements which have already been programmed by 
somebody at Microsoft and frozen into ROM chips 
inside the computer. When the computer (always 
scanning and waiting for carriage returns) finds that 
you have typed LOAD, it has a list of addresses and 
chooses the one associated with LOAD and jumps 
(UMP it’s called) to the address in ROM where the 
proper sequence of M.L. operations is set down. 
This sequence is like a subroutine. And BASIC. itself 
is nothing more than a huge web of thousands of 
M.L. subroutines. In the PET, for example, if you 
want to jump to the subroutine that sends the 
number in the 6502’s ‘‘accumulator’’ (defined below) 
to your screen, you type SYS 65490 and the com- 
puter is thrown into its M.L. mode and told to start 
doing the task which begins at the 65490th memory 
cell in it’s brain. That is near the top. There are 
maps of the computer’s memory cells. 


A Simple Map of the PET’s Brain 

0 to 1023—RAM (you can change it’s contents), but 
used by BASIC to store addresses (called pointers), 
temporary data (such as what you type in from the 
keyboard, called input buffer), temporary data of its 
own in a stack, and all manner of reminders to itself 
about whether or not the tape recorder is on, etc., 
(called flags). So, if you tamper with these memory 
cells, you might confuse the computer enough to 
send it into an endless loop within itself and you 
cannot communicate with it again until you turn off 
the power and force it to reset (get itself together). 

1024 to 32767—your RAM to use for BASIC 
programs, or M.L. programs which you put 
together. Unlike ROM, these cells can each contain 
any number from 0 to 255. ROM is frozen with its 
various numbers carved in forever. All PETs start 
their RAM here, but if you have 8k then you can 
only use RAM up 8000 cells from 1024. 

32768 to 33791—the cells of your screen (40 

column screens). 

36864 to 45055—space for you to add new 

ROM chips such as Toolkit. 

45056 to 65535—-BASIC itself, along with the 

computer’s instructions about interrupting itself 

(if you should press STOP, for example), how to 

run the T.V. (CRT or monitor), how to talk 

to the peripherals (I/O), and other housekeeping 

chores (called the operating system). 

Far more detailed maps are available to tell you 
exactly where things happen inside. See back issues 
of COMPUTE! for Jim Butterfield’s exhaustive 
maps for PET (issues #1, #6), APPLE (issue #2), and 
others (issue #2). 
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QUALITY DISK SOFTWARE 


BACKED BY ON-GOING APPLICATIONS SUPPORT 
from SPECTRUM SOFTWARE 


APPLE Il ® 


HOME FINANCE PAK |: Entire Series $49.95 @ © 
CHECK REGISTER AND BUDGET: This comprehensive CHECKING ACCOUNT 
MANAGEMENT SYSTEM not only keeps complete records, it also gives you 
the analysis and control tools you need to actively manage your account. 
The system provides routines for BUDGETING INCOME AND EXPENSE. 
AUTOMATIC CHECK SEARCH. and BANK STATEMENT RECONCILING, CRT or 
printer reports are produced for ACTUAL EXPENSE vs BUDGET, CHECK 
SEARCH DISPLAY RECONCILIATION REPORT and CHECK REGISTER DISPLAY 
by month. Check entry is prompted by user-defined menus of standard 
purposes and recipient codes, speeding data entry and reducing disk 
storage and retrieval time. Six fields of data are stored for each check: 
amount, check no., date. purpose. recipient and TAX DEDUCTIBLE 
REMINDER, CHECK SEARCH routines allow searching on any of these data 
fields. Routines are also provided for CHECK SORT by date and check no. 

DATA EDITING and Report Formats. Up to 100 checks/mo. storage 
mess tarrecekcpsvene lefai oc ayeve isis, Srereis ehateiocojssi acai agetstachisaslstsusie/S)4 a $39.95 


SAVINGS: Account management system for up to 20 separate Savings 
accounts. Organizes, files and displays deposits, withdrawals and 
interest earned for each account. Complete records shown via CRT or 
PRIMER ate sas. spscueumieretgiocere ore: ave anateracarers secs ra sete vere tend aera $14.95 


CREDIT CARD: Get Control of your credit cards with this program 

Organizes, stores and displays purchases, payments and service charges 
for up to 20 separate cards. Use for credit cards or bank loans. CRT or 
printer reports .. $14.95 


UNIVERSAL COMPUTING MACHINE: $49.95 ® 
A user programmable computing system structured around a 50 row x 50 
column table. User defines row and column names and equations forming a 
unique computing machine. Table elements can be multiplied. divided, 
subtracted or added to any other element. User can define repeated 
functions common to row or column greatly simplifying table setup. 
Hundreds of unique computing machines can be defined, used and stored 
and recalled, with or without old data. for later use. Excellent for sales 
forecasts. engineering design analysis, budgets. inventory lists, income 
Statements, production planning. project cost estimates-in short for any 
planning. analysis or reporting problem that can by solved with a table. 
Unique curser commands allow you to move to any element. change its 
value and immediately see the effect on other table values. Entire table can 
be printed by machine pages (user-defined 3-5 columns) on a 40 column 
printer 


COLOR CALENDAR: $29.95 @ 
Got a busy calendar? Organize it with Color Calendar. Whether it's 
birthdays, appointments, business meetings or a regular office schedule 
this program is the perfect way to schedule your activities. 

The calendar display is a beautiful HI-RES color graphics calendar of the 
selected month with each scheduled day highlighted in color Using the 
daily schedule, you can review any day of the month and schedule an event 
Or activity in any one of 20 time slots from 8:00 A.M. to 5:30 P.M. Your 
description can be up to 20 characters long. The system will also print out 
hard copies on your minimum 40-column printer 


BUSINESS SOFTWARE: Entire Series $159.95 ® @ 
MICROACCOUNTANT: The ideal accounting system for small businesses 
Based on classic T-accounts and double-entry booking, this efficient 
Program provides a ledger journal for recording posting and reviewing up 
to 1,000 transactions per month to any one of 300 accounts. The program 
produces CRT and printer reports covering 

Transaction Journal Balance Sheet 

Accounts Ledgers Income and Expense Statement 


Includes a short primer on Financial Accounting. Requires 48K Ram 
Asko shaya lohan) a} ece ose aata reine Ges lglele Ba(slalelsle xb wi =vaiwiornie $49.95 


UNIVERSAL BUSINESS MACHINE: This program is designed to SIMPLIFY 
and SAVE TIME for the serious businessman who must periodically 
Analyze. Plan and Estimate. The program was created using our Universal 
Computing Machine and itis Programmed to provide the following planning 
and forecasting tools. 

CASH FLOW ANALYSIS. 
PROFORMA PROFIT & LOSS. 
PROFORMA BALANCE SHEET JOB COST ESTIMATOR 
REAL ESTATE INVESTMENT INVENTORY ANALYSIS 


Price, including a copy of the Universal Computing Machine . . 


SALES FORECASTER 
SOURCE AND USE OF FUNDS 


«« $89.95 


TRS°80 © 


BUSINESS CHECK REGISTER AND BUDGET: Our Check Register and Budget 
programs expanded to include up to 50 budgetable items and up to 400 
checks per month. Includes bank statement reconciling and automatic 
cheek'searchi(4Bk)| S-t.sies siatsiasinsernor cote eimai eters ects es $49.95 


ELECTRONICS SERIES: Entire Series $259.95 

LOGIC SIMULATOR: SAVE TIME AND MONEY. Simulate your digital logic 
circuits before you build them. CMOS, TTL. or whatever, if it’s digital logic, 
this program can handle it. The program is an interactive, menu driven, 
full-fledged logic simulator capable of simulating the bit-time response of a 
logic network to user-specified input patterns. It will handle up to 1000 
gates, including NANDS, NORS. INVERTERS, FLIP-FLOPS, SHIFT REGISTERS. 
COUNTERS and user-defined MACROS. UP to 40 user-defined random. or 
binary input patterns. Simulation results displayed on CRT or printer 
Accepts network descriptions from keyboard or from LOGIC DESIGNER for 


SIMUlatlON: Sn, ceacasys Waaetran sents De Metra inate $159.95 @)@) 


LOGIC DESIGNER: Interactive HI-RES Graphics program for designing digital 
logic system. A menu driven series of keyboard commands allow you to 
draw directly on the screen up to 15 different gate types, including 10 gate 
shape patterns supplied with the program and 5 reserved for user 
specification. Standard patterns supplied are NAND, NOR, INVERTER, EX- 
OR, T-FLOP. JK-FLOP. D-FLOP. RS-FLOP. 4 BIT COUNTER and N-BIT SHIFT 
REGISTER. User interconnects gates just as you would normally draw using 
line graphics commands. Network descriptions for LOGIC SIMULATOR 
generated simultaneously with the CRT diagram being drawn. $159.95 @ 


MANUAL AND DEMO DISK: Instruction Manual and demo disk illustrating 
Capabilities of both programs .......... cece eeecceeee $29.95 


MATHEMATICS SERIES: Entire Series $49.95 @) 
STATISTICAL ANALYSIS |: This menu driven program performs LINEAR 
REGRESSION analysis. determines the mean, standard deviation and plots 
the frequency distribution of user-supplied data sets. Printer, Disk, 1/0 
routines $19.95 


NUMERICAL ANALYSIS: HI-RES 2-Dimensional plot of any function 
Automatic scaling. At your option, the program will plot the function, plot 
the INTEGRAL, plot the DERIVATIVE, determine the ROOTS, MAXIMA. 
MINIMA, INTEGRAL VALUE +> $19.95 


MATRIX: A general purpose, menu driven program for determining the 
INVERSE and DETERMINANT of any matrix, as well as the SOLUTION to any 
set of SIMULTANEOUS LINEAR EQUATIONS. ............... $19.95 


3-D SURFACE PLOTTER: Explore the ELEGANCE and BEAUTY of MATHE- 
MATICS by creating HI-RES PLOTS of 3-dimensional surfaces from any 
3-variable equation. Disk save and recall routines for plots, Menu driven to 
vary surface parameters. Hidden line or transparent plotting ... $19.95 


ACTION ADVENTURE GAMES: _ Entire Series $29.95 @ 
RED BARON: Can you outfly the RED BARON? This fast action game 
simulates a machine-gun DOGFIGHT between your WORLD WAR|BI-PLANE 
and the baron’s. You can LOOP. DIVE, BANK or CLIMB-and so can the 
BARON: Ini HERESigtaphics:, cicizwe cre cicrerercernseieemeiiee cess $14.95 


BATTLE OF MIDWAY: You are in command of the U.S.S, HORNETS’ DIVE- 
BOMBER squadron. Your targets are the Aircraft carriers, Akagi, Soryu and 
Kaga. You must fly your way through ZEROS and AA FIRE to make your 
DIVE-BOMB run. In HI-RES graphics . . $14.95 


FREE CATALOG-All programs are supplied on disk and run on Apple. Il 
w/Disk & Applesoft ROM Card & TRS-80 Level Il and require 32K RAM unless 
otherwise noted. Detailed instructions included. Orders shipped within 5 
days. Card users include card number. Add $1.50 postage and handling 
with each order. California residents add 62% sales tax. Foreign orders add 
$5.00 postage and handling 


SPECTRUM SOFTWARE 
142 Carlow, P.O. Box 2084 
Sunnyvale, CA 94087 


FOR PHONE ORDERS: (408) 738-4387 == 
DEALER INQUIRIES INVITED. ay @S 
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The Monitor and the Three Kinds of Numbers 
It is important in learning M.L. programming to 
grasp a distinction between the three ways that the 
computer could see any number. Depending on the 
context, it will think that a given number is either a 
datum, an address, or instruction (a task it should 
perform, such as fetching something). To illustrate 
this distinction, we can construct a simple, but very 
common, M.L. routine using the PET M.L. Moni- 
tor. (If you have another computer, the addresses 
where you locate this experiment and the address of 
your screen RAM might differ, but all our 
6502-based machines use the same M.L. instruction 
set). To enter the monitor, we must SYS to any ad- 
dress in the PET which contains a zero. There is 
always a zero at address 1024 so we can type SYS 
1024 and the PET will display the ‘‘registers’’ and 
the cursor will land beside a dot, indicating that the 
monitor is available for our commands. 

Let’s ignore the register, and simply notice that 
the fourth number listed is under an ‘‘ac’’ which 
means that, at this time, the ‘‘accumulator’’ in the 
6502 chip contains this number. For a long time, I 
wondered which addresses in the PET contained the 
accumulator, the x register and the y register. They 
are actually unique and not part of the RAM or 
ROM memory as such. These registers are stopping 
places for data as it streams from one place to 
another, from one actual memory cell to another. 
But on to the experiment. 

We will put the letter ‘‘A’’ on the screen. 
Following the dot, type: 

-m 0360 370 (this asks for the numbers between 

these hex addresses) 

Then, when the numbers appear, type in these new 
numbers right over the ones on the screen: 

.0360 A9 41 8D 00 80 00 (we have written a 
complete action for PET with this, so hit the return 
key to let the monitor enter these new hex numbers 
in place of the old ones). If your monitor types a 
“©?” then you have made an error where the ‘‘?”” 
appears on the line. Try again. 

What have we got here? When the PET is told 
to start with the instruction AQ it will load the next 
number in our sequence into the accumulator. That 
will be the 41. Then it looks at the 8D which tells it 
that the following two numbers (00 80) are the ad- 
dress to store what is in the accumulator so it puts 
the 41 at address 8000 (which is hex for the first cell 
on the screen — and an ‘‘A’’ will appear there. How 
did 00 80 get changed into 8000? You just have to 
get used to it. An address is read into the computer 
LSB (least significant byte) first, followed by the 
MSB (most significant byte). 

The last number we entered was the 00. This is 
hex for 0, and it is called a ‘‘break’’ which was the 
way we got into the monitor with our SYS 1024. In 
this case, when finshed printing our ‘‘A’’, it will 
come upon our break instruction. Now type: .g 0360 


(which means go to 3060 and do what it says there). 
The ‘‘A’”’ will appear and the monitor will come 
back on showing its registers. Notice what is in the 
“‘ac’’, You can print any other letter by increasing 
the value where the 41 is. To return to the BASIC 
mode, type an ‘‘x’’. 

This example, so simple, is just how the com- 
plex tasks are performed by the computer — one 
thing at a time (but fast). Organize enough of these 
segments and you have BASIC, or FORTRAN, or 
any other ‘‘higher’’ language. Look at the two 00’s 
we used. They represent two different types of 
numbers which are context-defined in the computer. 
Since the first 00 followed an instruction (8D) which 
said put the ‘‘A’’ here, the computer knew that this 
00 was the less important part of an address and the 
next number it found would be the MSB of that 
same address. Having finished that job, it asks, what 
next? The next number can never be an address or a 
datum. It must be an instruction to the computer, so 
the 00 in this position is the instruction ‘‘break.’’ A 
number can only be either a datum, an address, or 
an instruction. Of these three possibilities, the com- 
puter knows how to interpret a number by the ‘‘syn- 
tax’’ (the relative position to other numbers in the 
sequence). This is exactly how we know what some- 
one means when they say ‘“TOO TOO”’ on the 
phone, as in ‘‘My little girl is two today.”’ 

So, our ‘‘41’’ can translate three ways: datum 
— the actual number (or what that number means in 
a code, ‘‘A’’ in the ASCII standard translation 
system); 2. address — the 41st (65th in decimal) ad- 
dress cell in the computer; 3. instruction — please 
exclusive — or the number located in the cell pointed 
to by the address in the first 256 bytes as offset by 
the x register. (Before you are alarmed, there is very 
little chance that you will ever use this particular in- 
struction with this addressing mode in your entire life.) 


M.L. or Assembly Language 
What we have just done is the most elemental level 
of coding next to flipping switches for each bit in 
each byte. We have entered our code a byte at a 
time using hex humbers. But this is slow. And, since 
numbers are so abstract, they are hard to remember. 
The term ‘“‘mnemonic’’ means ‘‘memory helper’’ 
and this is the next step up. Simple toggle switch or 
hex programming is usually called “machine level” 
or ‘‘machine language’ programming. If you use a 
three-letter mnemonic instead of A9 to help you 
remember that this loads the accumulator, things will 
be easier. LDA means load the ‘‘ac’’, BRK stands 
for break, and STA means store ‘‘ac’’, and so forth. 
There are 55 mnemonics, one for each task that our 
6502 can perform. However, some of them are so 
rarely used that you can easily copy down the main 
ones and learn the strange ones later if you want. 
Most everything can be done with about 20 of them. 
Of course, the computer will not understand 
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SPECIAL: 


Additional 10% off on all CBM hardware 


wrreow SS PET RABBIT castirre EHS |S NOWA 


The PET RABBIT contains high-speed cassette routines, 
auto-repeat key feature, memory test, decimal to hex, hex 
to decimal, and other features. Coexists with the BASIC 
PROGRAMMERS TOOLKIT. Works with 3.0 ROMS 
(New) and new style cassette deck. 


Cassette versions configured for $1800, $3000, $3800, 
$7000, and $7800. (3.0 ROMS only) 
Cassette and manual — $29.95 


ROM version configured to plug into P.C. board at SAQOO. 
(Specify 3.0 or 4.0 ROMS) 
ROM and manual — $49.95 


FREE ROM RABBIT with purchase of 8K PET and tape 
deck. 
SPECIAL - ROM RABBIT and cassette deck — only $134.95 


MACRO ASSEMBLER 


AND 


TEXT EDITOR 


Macro and conditional assembly, string search and replace, 
10 char./label, AUTO line numbering. MOVE, COPY, 
DELETE, NUMBER, and much more 20+ commands, and 
20+ pseudo ops. 


PET cassette version (ASSM/TED) — $49.95. 

(Specify 2.0, 3.0, or 4.0 ROMS.) 

PET disk version (MAE) — $169.95 

(Specify 3.0, 4.0, or 8032) 

ATARI cassette version with machine language monitor — 
$53.95 


FREE ASSM/TED and ROM RABBIT with purchase of 
32K PET and cassette deck. 


FREE MAE with purchase of 32K PET and disk drive. 


TINY-C FOR PET 


An adaptation of the TINY-C interpreter sold by Tiny-C 
Assoc. Useful for learning a modern structured programming 
language. Diskette — $50.00. Owners manual — $50.00 


FREE MAE and TINY-C with purchase of 32K PET, disk 
drive, and printer. 


COMPILERS 


Graphics Drawing Compiler for PET and SYM. Works with 
Macro ASSM/TED. The GDC is composed of a number of 
macros which emulate a high-level graphics drawing language. 
In addition to the macros, GDC provides some very useful 
enhancements to the ASSM/TED. Manual and Cassette — 
$29.95. 


Music and Sound Composer for PET. Works with Macro 
ASSM/ TED. The MSC is composed of a number of macros 
which emulate a high-level computer music language. In 
addition to the macros, MSC provides some very useful 
enhancements to the ASSM/TED. Manual and Cassette — 


$29.95. 
1/O KIT 


PET 1/O Experimenters Kit. Allows easy access to IEEE or 
user port for the construction of external circuits. Kit — 
$39.95. 


‘\ 
a 


ws 


ORDERING TERMS 
Send check or money order in U.S. dollars. Add_2% for 


postage for CBM orders. Overseas software orders add 
$5.00. All software mailed free in USA and Canada. 


Purchase orders acceptable. 


COMMODORE DEALER 


EHS offers a number of software products for PET, ATARI, 
APPLE, and other 6502 computers. Now we sell CBM 
hardware. If you’re in the market for PET products, be 
sure to look for our FREE software offers. Note: Be sure 
and deduct 10%. 


CBM 


4001-8KN 
4001-32KN 
8032 

2022 

4040 

8050 

C2N Cassette 
CBM to IEEE 
IEEE to IEEE 
8010 

2.0 DOS 


PRODUCT DESCRIPTION 


8K RAM-Graphics Keyboard 
32K RAM-Graphics Keyboard 
32K RAM 80 Col.-4.0 O/S 
Tractor Feed Printer 

Dual Floppy-343K-DOS 2.1 
Dual Floppy-974K-DOS 2.0 
External Cassette Drive 

CBM to 1st IEEE Peripheral 
CBM to 2nd IEEE Peripheral 
IEEE 300 Baud Modem 

DOS Upgrade for 2040 

4.0 O/S O/S Upgrade for 40 Column $ 110.00 
VIC Computer New Commodore $ Call or Write 


EDUCATIONAL DISCOUNTS 
BUY 2 — GET 1 FREE 


TRAP 65 


TRAP 65 prevents the 6502 from execulting unimplemented 
instructions. Have you ever had your system to crash on a 
bad upcode? This is a real machine language debugging tool 
and time saver. Also useful for teaching trap vectoring and 
extension of instruction set in schools. 3% X 4% printed 
circuit board which plugs into 6502 socket of any PET, 
APPLE, SYM. Only $149.95. 


ATARI M.L. MONITOR 


Load and save binary data on cassette. Display and change 
6502 registers. Will coexist with BASIC. Monitor uses the 
screen editing capabilities of the ATARI to allow easy use. 
Cassette and manual — $9.95 (specify memory size). 


ATARI MEMORY TEST 


When you purchase a new ATARI or add on new RAM 
modules, you need to be sure that the memory is working 
properly. (Remember, you only have a short guarantee on 
your memory!) Cassette and manual — $6.95, 


APPLE PRODUCTS 


Macro ASSM/TED — includes manual, on cassette — 
$49.95, on disk — $55.95 

Apple MAE — similar to PET MAE. A powerful assembly 
development system on diskette for 48K APPLE II or plus. 
(Requires license agreement) — $169.95. 

PIG PEN — 100% M.L. word processor for use with Apple 
ASSM/TED. Fast text formatting, vertical and horizontal 
margins, right and left justification, centering, titles, foots, 
shapes, etc. Manual and source included, on cassette — 
$40.00, on diskette — $45.00 


Apple Mail List System. Provides sorting on zip code or 
last name. Approximately 1000 names/diskette. Manual 
and Diskette — $34.95. 


EASTERN HOUSE SOFTWARE 
3239 Linda Drive, Winston-Salem, N.C. 27106 
Ph. Orders — 9-4 EST (919) 924-2889 
After 4pm 748-8846 
Send SASEfor free catalog 


PRICE 


$ 795.00 
$1295.00 
$1795.00 
$ 795.00 
$1295.00 
$1695.00 
$ 95.00 
$ 39.95 
$ 49.95 
$ 395.00 
$ 80.00 


24 COMPUTE! 


March, 1981. Issue 10. 


LDA. It only reads numbers, so you will use a pro- 
gram which lets you enter the LDA, but pokes A9 
(actually it hands the PET a decimal number and 
BASIC takes it down to the binary level for you.) 
The program which gives BASIC a translation of 
your LDA is called an assembler, hence assembly 
language or assembly programming. The terms 
M.L. and assembly language are used inter- 
changeably, though, and both refer to an entry of 
code in the same way that the computer will later 
follow it, byte by byte. 


Using the M.L. Routines from BASIC 


In many cases, you can use a routine in the BASIC 
code by finding its starting address with a map and 
then examining it with a disassembler (a program 
which looks at the raw numbers and translates them 
back into mnemonics). Then you can just JMP 
(jump) or JSR (jump to subroutine) from your M.L. 
program directly into BASIC’s M.L. code. 

If you are programming in BASIC itself, life is 
simple, but execution of your program can be too 
slow. To use our example, if you wanted to print an 
‘A’? from BASIC you would type! PRINT ‘“‘HA”’ 
and the computer would put a 41 into the ac- 
cumulator and jump to 65490 where an all-purpose 
routine for outputting a byte is located in the BASIC 
ROM. You could also do this with an M.L. routine 
by typing: 0360 A9 41 20 D2 FF 00 (The 20 is JSR 
and the FFD2 is hex for 65490). 

But this, too, is slow. After landing in the 
BASIC ROMs, the first thing that PET does is a 
jump to another address where it determines that you 
mean to send the ‘‘A”’ to the screen and not to the 
tape or a printer, Then it flys down to a “‘vector’’ at 
address 00BO which is rather like a corner shot in 
pool — when it gets here it just picks up another ad- 
dress and goes back up into ROM memory pretty 
close to where it jumped from. And so on. Since 
BASIC must do all kinds of jobs, it is more general 
than any routine you program in M.L. yourself. It 
has to check many parameters before acting to send 
your ‘‘A’’ to the screen. So, often, you will want to 
save time and code in M.L. yourself. Using routines 
from the BASIC ROM also requires that you know 
what these routines expect as preconditions. That 
output routine will print whatever is in the ac- 
cumulator, so you must have loaded it already with 
the character wanted. 

To give another example, you can print a large 
decimal number to the screen (as in scorekeeping 
during a game) by a JSR to CF83 (in BASIC 4.0), 
but you must already have placed the LSB of that 
number in the X register and the MSB in the ac- 
cumulator. If you want to experiment with this, go 
into the monitor and when the registers show on the 
screen, type over the number in the ‘‘ac’’ and the 
number in the ‘‘xr’’ with the MSB & LSB of the 
number you want to have printed. Typing return 


will change these registers. Then: .0360 20 83 CF 00 
-g 0360 

What you are doing here is entering BASIC 
where it prints line numbers on the screen during a 
LIST, but you are going in and out of that particular 
area without using any other aspect of that code. 
Trying to set up this sort of printout would be un- 
necessary and time-consuming if you tried to do it 
yourself. So, in this case, we are happy to ‘‘borrow”’ 
some already programmed M.L. routines from the 
BASIC ROM. 


M.L. or BASIC—Which Is best? 

Often, BASIC is best. It is easier to program and 
easier to debug (fix errors). Whole tasks can be left 
to the computer which you would have to carefully 
program in M.L. code. And BASIC uses a language 
which is crypto-English. At least for the beginner, 
PEEK is easier to relate to than LDA. 

M.L. code, when you RUN a program, will 
often enter never-never-land — an endless loop 
which you cannot get out of without turning off the 
computer and destroying the program. There are 
‘‘warm’’ resets which you can add to the PET which 
will exit such a loop and leave your program intact. 
One helpful technique is to fill the memory area that 
you are coding with zeros before you start. Then, if 
something goes awry, you might land on a zero 
which, as a BRK instruction, will safely send the 
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PROGRESSIVE COMPUTER SOFTWARE, INC. 


405 Corbin Rd., York, Pa. 17403 
(717)845-4954 


Invites You To 


STEP INTO THE WORLD 
OF MACHINE LANGUAGE 
PROGRAMMING 


with 


TEMA 2 

The most powerful machine language debugging 
tool ever developed for the APPLE Il. Debug 
machine language as easily as BASIC. 

¢ Flexible instruction set 

* Command input syntax editor 

* Totally invisible to the user program 

¢ Complete, in-depth documentation 

* Unique, PCS standard, self-paced 

¢ Trainer program 

° For 3.2 or 3.3 DOS 


We specialize in systems and application hardware 
for HDE and APPLE products. 
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PET into the monitor. 

Unless you use a more advanced type of 
Assembler, which allows you to label addresses and 
values — it can be hard to keep track of where your 
subroutines start and which addresses hold which 
flags, etc. BASIC provides you with the convenience 
of line numbering, but in simple M.L. assembly, the 
reference point will be a certain memory address. 
Obviously it is easier to remember that a subroutine 
starts on line 1000 than that it starts at 035B. A way 
around this is to start each routine at a particularly 
obvious hex number: 0400 0450 0500 0550 0600. In 
this way, you also avoid another problem which 
bedevils M.L. programmers: error correction. As 
you know, if you need to put something in between 
two lines in BASIC, you merely type in a new line 
number between them. With M.L., there are no line 
numbers and no editor to help you make inserts. 
You might have to recopy dozens of instructions to 
make room for a new instruction. Leaving space 
around your routines, however, will avoid this 
problem. 

Another stumbling block for the novice M.L. 
programmer is addressing. There are often several 
ways to move data in and around. And, it might 
take awhile to get them straight in your mind. As 
always, it is best to practice with a simple task, going 
through the various ‘‘addressing modes’’ to see the 
uses and strengths of each one. Most of the books on 
assembling are weak in this area. For me, the most 
lucid description of M.L. addressing appears in an 
article by Jim Butterfield (COMPUTE!, November/ 
December, 1980. Pg. 98). 


What You Need to Get Started 


You will want a good book with examples which 
show you how to add, subtract, compare, and loop, 
etc. in M.L. You need a memory map for your com- 
puter’s BASIC and a list of the 6502 mnemonics and 
ASCII equivalents in both decimal and hex. You 
should have a simple assembler and disassembler. 
The best bet here is to locate a copy of the ‘‘en- 
hanced monitor’ program which fits your ROM set. 
Programs called ‘‘Extramon’’ and ‘‘Supermon’’ are 
available and they can make things easier. They have 
commands which will hunt through memory for a 
designated set of instructions; compare one block 
with another; fill memory with a particular byte; go 
through your program one instruction at a time 
(called single stepping) which can be very useful; 
and relocate your M.L. routines wherever you want 
them in RAM. All in all, a good BASIC assembler 
works fine, one of these ‘‘enhanced monitors’’ adds a 
great deal, and for truly complex assembling, you 
will want to have full-featured assembler such as 
MAE (sold by Eastern House Software). 

There are several reasons why M.L. code is 
worth the trouble. It uses very little memory space, it 
runs very fast (you must use it for high-speed tasks 


such as quality animation or large sorting and disk- 
access tasks). And, not least, it is challenging and 
quite satisfying to be working at the level or your 
machine. You cannot truly say that you understand 
computers until you know exactly how they ‘‘think’’ 
— and learning the machine’s language is the best 
way to gain this understanding. 

If you have questions, I will be glad to try to 
answer them if you send a SASE to the address 
below. 

Richard Mansfield, President 

SUPERSOFTWARE 

P.O. Box 461 

Philipsburg, PA 16866 ce} 


ATARI OWNERS!! 


HELP is here! 

HELP is a program that will give statement cross- 
referencing, program renumbering, string search and 
edit, and much more. A manual is included to help 


you learn more about program operation, strings, and 
files. Only $34.95 through April. ($39.95 after that.) 
Specify CASSETTE or DISK and add $2 for S&H. 

Our word processor will be available in April, too! ! 
Write or call for details. 


Computer’s Voice 


2370 Ella, Flint, Mi 48504 Phone: (313}238-5585 


APPLE § BEV 
MATE 


Now includes the Simplified Text Processor (STP) 


For 32K PET, disk 48K APPLE Il 
3.0 or 4.0 ROMS or —OR— or APPLE II + 
8032 (specify) and DISK It 

MAE FEATURES 

— Control Files for Assembling Multiple named source files 

from disk 

— Sorted Symbol table — Up to 31 chars./label 

— 27 Commands, 26 Pseudo-ops, 39 Error Codes 

— Macros, Conditional Assembly, and a new feature we developed 

called Interactive Assembly 

Relocatable Object Code 

String search and replace, move, copy, automatic line 

numbering, etc. 

STP FEATURES 

— 17 text processing macros 

— Right and lef: tification 

— Variable page gths and widths 


The Most Powerful Disk-Based 
Macro Assembler/Text Editor 
Available at ANY Price 


Document size limited only by disk capacity 
Software lower case provision for APPLE I! without lower 
case modification 

ALSO INCLUDED 

— Relocating Loader 

Sweet 16 macro library for APPLE and PET 

Machine Language macro library 

Sample files for Assembly and text processing 

Separate manuals for both APPLE and PET 


RICE 
— MAE, STP, Relocating Loader, Library files, 50 page manual, 
diskette — $169.95 


SEND FOR FREE DETAILED SPEC SHEET 
EASTERN HOUSE SOFTWARE 
3239 LINDA DRIVE 
WINSTON-SALEM, N.C. 27106 


(919) 924-2889 (919) 748-6446 
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“Your complete source 
for all CBM Hardware 


The 8032 CBM Computer is now available! 
€ commodore 


NEECO PROUDLY ANNOUNCES OUR 
NEW ONE YEAR WARRANTY 
oa Sottwere Produces ON ALL CBM COMPUTERS! 


CBM™ 8000 SERIES BUSINESS COMPUTERS 


The new Commodore 8000 series computers offer a wide screen 
display to show you up to 80-character lines of information. Text 
editing and report formatting are faster and easier with the new 
wide-screen display. The 8000 series also provides a resident 
Operating System with expanded functional capabilities. You 
can use BASIC on the 8000 computers in both interactive and 
program modes, with expanded commands and functions for 
arithmetic, editing, and disk file management. The CBM 8000 
series computers are ideally suited for the computing needs of 
the business marketplace 


CBM™ 8050 DUAL DRIVE FLOPPY DISK 

The CBM 8050 Dual Drive Floppy Disk is an enhanced version of 
the intelligent CBM 2040 Disk Drive. The CBM 8050 has all of the 
features of the CBM 2040, and provides more powerful software 
Capabilities, as well as nearly one megabyte of online storage 
capacity. The CBM 8050 supplies relative record files and 
automatic diskette initialization. It can copy all the files from one 
diskette to another without copying unused space. The CBM 
8050 also offers improved error recovery and the ability to 
append to sequential files 
HARDWARE SPECIFICATIONS 
Dua! Drives 


FIRMWARE 
DOS version 2.1 
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Two microprocessors 
974K Bytes storage on two 
5.25” diskettes (single sided) 


Sequential file manipulation 
Sequential user files 
Relative record files 


Tracks 70 

Sectors 17-21 

Soft sector format 

IEEE-488 interface 

Combination power (green) and 
error (red) indicator lights 

Drive Activity indicator lights 

Disk Operating System Firmware 
(12K ROM) 

Disk Buffer (4K RAM) 


Append to sequential files 

Improved error recovery 

Automatic diskette initialization 

Automatic directory search 

Command parser for syntax 
validation 

Program load and save 


com PRODUCT DESCRIPTION PRICE NOTE: cam PRODUCT DESCRIPTION PRICE 
4008N 8K RAM-Graphics Keyboara-40 col $ 795.00 A CBM 2040 Qual Floppy-343K-DOS 10 $1295.00 
4016N 1€KN RAM-Graphics Keyboard-40 col § 995.00 Hi current 4040 Dual Floppy-343K-DOS 20 $1295.00 
40168 16K RAM-Business Keyboard-40 col $ 995.00 production 8050 Dual Floppy-974K-DOS 20 $1695.00 * 
4032N 32K RAM-Graphics Keyboard-40 col $1295.00 CC Tee ~«C2N Cassette External Cassette Drive $ 95.00 
40328 32K RAM-Business Keyboard-40 col, $1295.00 tal CBMIolEEE CBM to Ist IEEE Peripheral $ 39.95 
8016 16K RAM-80 Col -4 1 O/S res ow contain IEEE to IEEE CBM to 2nd IEEE Peripheral $ 49.95 
8032 32K RAM-80 Col -4 1 0/S $1795.00 operating system My \EEE 300 Baud Modem $395.00 * 
2023 Friction Feed Pri $ 695.00 4.1/DOS 2.1 2000S DOS Upgrade for 2040 $ 50.00 
2022 Tractor Feed Printer $ 795.00 400/S /S Upgrade tor 40 Column $ 100.00 


“Asterisks indicate fall delivery—all others are immediately available 


SPECIAL OFFER ON CBM COMPATIBLE BUSINESS SOFTWARE! 


Purchasing software has always been difficult due to the “you buy it - you own it” attitude of most 
vendors. We at NEECO, recognize this problem and can now, on all of the Software Packages listed, offer 
a full 30 day refund policy to NEECO's customers. Now you can purchase with confidence. Buy it - try i 
if the program package is not suitable for any reason, send it back to us within 30 days and we will refund 
the full purchase price—less shipping charges! 


SOFTWARE APPLICATION REQUIRES AUTHOR AVAILABILITY PRICE 
Word Pro! Word Processing 8K + cassette Professional Software Immediate $ 2995 
Word Pro I 10K + 2040 99.95 
Word Pro Ili Plus 32K + 2040 395.00 
Word Pro IV Plus 6032 + 2040/8050 595.00 
BPI Integrated G/L Business 32K /8032 + 2040 BPI 360.00 
BPI Payroll Ls 
8PI Enhanced A/R 
CMS G/L CMS Software 295.00 
CMS A/R 195.00 
CMS A/P 195.00 
CMS Customer Mail List 195.00 
CMS Payroll 350.00 
Datasource 1 All Business 32K /8032 + 2050/8050 8MB August/Sept 295.00 


“Wordprocessing Software requires output printer. We recommend the NEC Spinwriter ($2995) for letter quality 
“PET Is a registered trademark of Commodore Business Machines. Small Keyboard PETS require a ROM Retrofit Kit 
Multi-Cluster is available in Canada from BMB Compu Science. P.O. BOX 121, Milton, Ontario, L9T2¥3 
All prices and specifications are subject to change without notice 


NEW ENGLAND ELECTRONICS CO., INC (61 7) 449 -1 760 


NEW ENGLAND's Largest 
EPTEC 


NEECO 


679 HIGHLAND AVE STEP 


SHAR A 
EX NUMBER 951021, NEE 


MON-FRI, 9:00-5:30 


Computer Showroom 
NEEDHAM, MA 02194 
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NEECO announces the MIPLOT Plotter from WATANABE 


MIPLOT WX4671 


4 ]_Coderasc) | 
oD OF 


S] 


$1250.00* 


“Includes interface to CBM, Atari", Apple, or 
TRS*80**. Please specify. 


© 26 cm X 36 cm Plotting area 

¢ .1 mm Addressing Resolution Please CALL or WRITE for 

¢ Full ASCII in any of 15 different specifications and information. 
character sizes » Atari is a registered trademark 

e Uses standard felt tip pens **TRSe80 is a registered trademark of Tandy Corp. 


The following peripherals and accessories are INSTOCK AT NEECO: 

1. AXIOM PRINTER Complete PET graphics 
- Plug compatible 

Electrostatic paper 

40 or 80 columns 


2. 16 or 24K EXPANDAMEM PI ' 
ug compatible 
INTERNAL MEMORY Dynamic low heat memory 16K = $289.00 
EXPANSION UNIT Proven reliability 24K - ‘379.00 
No adaptor needed 


Complete PET graphics 
Separate keypad 

Plug compatible 

With cover 


*8K-2001 with original keyboard and built-in cassette 
NEW ENGLAND ELECTRONICS CO., INC. ) = 
NEECO  “wenavmonscrroweso-m® (617) 449-1760 
679 HIGHLAN 


NEEDHAM, MA 02194 


MASTERCHARGE OR VISA ACCEPTEL 
TELEX NUMBER 951021. NEE 


MON-FRI. 9:00-5:30. E.S.T 


Computer Showroom” 
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Computer 
Communica: 
tions 
Experiments 


Marvin L. De see 

Department of Mathematics-Physics 
The School of the Ozarks 

Pt. Lookout, MO 


I. Introduction 

This article describes a RS-232C interface circuit for 
serial input/output that can be used with any com- 
puter peripheral that uses such an interface. In this 
instance, the peripheral is a modem (NOVATION 
CAT) that can be used to transmit and receive data 
over telephone lines. Many modems require a RS- 
232C interface, hence the need for the circuit which 
in turn uses a 6551 ACIA (Asynchronous Com- 
munication Interface Adapter). The purpose of 
publishing this work is to find one or more persons 
who would be willing to experiment with computer 
communications over telephone lines. The article also 
describes some very simple software that can be used 
with a modem to transmit and receive messages over 
telephone lines. Later, more sophisticated load and 
dump routines can be written to transfer large 
amounts of data and/or programs from one user to 
another. 

A true confession is that I am a beginner in the 
area of computer communications, and I would like 
to try some simple experiments before I fork-up a big 
subscription fee to one of the networks, only to find 
that my equipment or my understanding is inade- 
quate. If you can obtain the necessary equipment 
and if you are in roughly the same position, write me 
a letter when you have said equipment operating and 
we will try to arrange a time to try our hardware and 
software on a telephone link. I might add that the 
software and hardware described here have not been 
tested, except in the ‘‘TEST’’ mode on my modem, 
in which case everything worked properly. I am 
aware that my routines are simple and slow, and I 
would welcome suggestions for improvement. 


Il. Cireults And Things 

I sometimes wonder if there are any hardware en- 
thusiasts like myself out there. You might let your 
editor/publisher know of your interests. My hardware 
fan club seems to be the null set, judging from the 
amount of mail I get. But here is another circuit 
even if no one ever builds it. You can always buy an 


RS-232C interface anyway. The circuit is shown in 
Figure 1. It consists of three integrated circuits, a 
6551 ACIA, a MC1489 RS-232 line receiver, and a 
MC1483 RS-232 line driver. The latter two circuits 
change the RS-232 signal levels to TTL levels, and 
TTL level signals to RS-232 signal levels, respec- 
tively. The 6551 ACIA operates at TTL levels (5 
volts is logic one, zero volts is logic zero), while the 
modem operates at RS-232C signal levels (see 
Michael E. Day’s RS232 Communications in COM- 
PUTE!, September/October 1980, page 26). The 
power connections for the MC1488 and 1489 devices 
are given in Table 1. 


Table 1. Power Connections for the RS-232 line driver 
and line receiver. 


MC1488 Pint = -12V Pin 14 = +12V Pin7 = GND 
MC1489 Pin 14 = +5V Pin7 = GND 


The connections to the left of the 6551 ACIA are 
made to the user’s microcomputer system. Most of 
the signals are standard 6502 system bus signals, and 
require no explanation. Thus, address lines A@ and 
Al are used to address the four registers of the 6551, 
and are connected to the register-select pins RS@ and 
RS1. (You will probably want to obtain a specifica- 
tion sheet from either Rockwell or Synertek when 
you get your 6551; in fact, I advise you not to build 
the circuit without a spec sheet.) The data bus con- 
nections are shown in Figure 1, as well as several of 
the 6502 control lines (R/W, 6,, RES, IRQ). A 
1.8432 MHz crystal is also required. Still referring to 
the connections on the left-hand side of the 6551 in 
Figure 1, we are left with pins CS@ and CS1, the 
chip selects. 
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Figure 1. Circuit for the 6502-to-RS-232C-to-Modem interface. 


DYNACOMP 


Quality software for*: 


ATARI TRS-80 (Level II)* 
PET NORTH STAR 
APPLE II Plus CP/M 8” Disk 


GAMES, SIMULATIONS, EDUCATION and 
MISCELLANEOUS 


BRIDGE 2.0 (Available for all computers) Price: $17.98 Cassete/$21.95 Diskette 
‘Anallnclasve version of this most popular ef card games. This program both BIDS and PLAYS either contractor duplicate bridge 
Depending on the contract, your computer opponents wl either play the offense OR defense. If you bid too high the computer will 
‘double your conttact™ BRIDGE 20 provides challenging entetaienent for advanced players ad an exselien larg fl forthe 
bridge novice 


HEARTS 1.5 (Available for all computers) Price: $14.98 Casset¥e/$18.98 Diskette 
‘An esting and entertaining computer vernon of this popula card game. Hea i a tich-oviented game in which the purpose snot 19 
lake any bears or the queen of pages Play agains (m0 computer Opponents who are armed with hard-to best playing stratepes 


STUD POKER (ATARI only) Price: 11,98 Cassete/S1S.95 Diskette 
This the clan gamblers card game. The compote deals he cards ooe a ane ad you (and the computer bet on what you see The 
vnputer doe no chet at asus bets the ede. However, sometimes bas! ANG incladed a ive card dram poker being pac 

tie program. To package will ru on a 16K ATARI, Cover, arapis, sound 


POKER PARTY (Available for all computers) Price: $17.95 Cassette/S21.95 Diskette 
POKER PARTY i draw potersimolation bated on the book, POKER, by Onwald Jacoby. This the mort compeebenive verson 
avalabe for microcomputers. The party comssts of yourelf and xn ether (compute) players. Fach of these players (Qou will gt 19 
‘eow them) has a different personality i the form of a varying propensity to Buff o fold under prewure. Pracice wih POKER PAR. 
TY before nom 10 thal expensive game toniphi! Apple Cassette and dete verionsrequie a 32 X (or layer) Apple Il 


VALDEZ (Available for all computers) Price: $14.95 Cassete/518.95 Diskette 
‘A simulation of supertanker navigation inthe Prince William Soar and Valse: Narrows. The program set an extensive 254X286 ee 
‘ent radar map and employs physical models of ship response ad tidal pattern, Chart your own courte thous’ ship and eer ra 
Fie. Any standard terminal may be used for dplay 


FLIGHT SIMULATOR (Available for all computers) Price: $17.95 Cassette/S21.95 Diskette 
‘Atealinis and extensive mathematical simulation of take-off, flight and landing, The program utilizes aerodynamic equations and the 
‘haracteristis ofa tea afl. You can peactic instrument approaches and navigation using radials and compas headings. The mote 
[Advanced yer can alto perform loop, balftlls ang ular aerobatic manewvet 


CRIBBAGE 2.0 (TRS-80 only) Price: $14.98 Cassette/518.95 Diskette 
This ina well egies and nicely executed two-handed version ofthe classic card game, cribbage. It an excellent program for thee 
‘age payer i earch of a worthy opponent as well asthe bepinner wishing to lea the game, in particular the noting and argon. The 
fandardcittuge core board  coetinually shown at the top of the display (uteing the TRS-4/s graphs capabilities), with te cats 
town underneath. The computer automaticaly sceees and also announce Uh points using the Wadional paras 


CHESS MASTER (North Star and TRS-80 only) Price: $19.98 Cassete/$23.95 Diskette 
This complete and very powerfl program provides five levels of play. It ichides cating, em pastant captures and the promotion of 
pawns, Additonal), the board may be preset before the sar of play permiting the examination of "DOok"” plays To mame execu 
fiom ped, the program is writin in antemby anpuage (ty SOFTWARE SPECIALISTS of Calforna). Full praptic are employed is 
‘the THS-80 veruion, and two widths of alphanumeric daplay ate provided to accommodate North Star ier 


STARTREK 3.2 (Available for all computers) Price: $ 9.98 Cassette/$13.95 Diskette 
This ne clase Startrek simatation, but with several new features. For euareple, the Kloss now shoot atthe Exterpise without 
le ano attaching slartases a her quadranss The Kungors and beary cruisers and move shen 

The uusion hectic when the Enterpeie a beep by tree Beaty cts base S.O.S nveceved! The Kingom set 


SPACE TILT (Apple only) Price: $10.95 Cassete/$14.95 Diskette 
‘Use the game paddles to ithe plane ofthe TV screen to roll a bal into a ole in he screen Sound wmple? Not whe the Boe ets 
smaller and smaller! A bait in timer allows you to measure your shill against others i this habitforming action game 


GAMES PACK I (Available for all computers) Price: $9.95 Cassette/$13.95 Diskette 
‘GAMES PACK I contains the classic computer games of BLACKJACK, LUNAR LANDER, CRAPS, HORSERACE, SWITCH and 
more. These games have been combed into ope large program for eave In loading. They ate lalvigually accessed by a convenient 


GAMES PACK II (Available for all computers) Price: $9.98 Cassette/513.95 Diskette 
‘GAMES PACK II Includes the ames CRAZY EIGHTS, JOTTO, ACEY-DUCEY, LIFE, WUMPUS and ethers. As with GAMES. 
PACK I all be gamer are loaded a one progam and ae called from a mene 


Why pay $7.95 oF more per program when yos can buy 4 DYNACOME colletion fot jut 89.987 


NOMINOES JIGSAW (TRS-80 only) Price: $16.95 Cassette /$20.95 Diskette 
'NOMINOES JIGSAW isan ntigaing and sophisticated graphical pussle. The jae consists ofa Pby 9 Board paral ills with ran 
domly chosen shapes (somnoes), of wisch there are D types. By knowing tha he shapes must be legally comnected, and By RN 


Welty of the board seo 


MOVING MAZE (Apple only) 
MOVING MAZE employs the games paddies to diect a puck ftom oe ide ofa maze tothe other. However, he mate is dynamic 
{and randomly) butt and Is continually being modified. The objetive (10 creat the maze without touching (or Being Bt by) a wall 
Scoring by an lapied time indicator, and three ls 


BLACK HOLE (Apple only) Price: $14.95 Cassette/S18.98 Diskette 
This san exciting raphical simulation ofthe problems involved i closely observing & Mack hole with a space probe. The objects 10 
center and mairain, fot a prescribed time, an oret clone tou small iach hole Ths sto be achieved without comitg so near the anomaly 
thatthe tidal tex dettys the prote- Corto! ef th craft i realistically simulated using se et for rtation ad main thruster fF 
axceleration, Thi program employs Hi:-Re sraphics ad i edocational aswell at challenging 


‘TEACHER'S PET I (Available for all computers) Price: § 9.95 Cassette/$13.95 Diskette 
This ithe fir of DYNACOMP"s educational packages, Primarily intended for ye school to grade 3, TEACHER'S PET provides the 
young sfadent with counting practic, letler-word revogniion and three levels of math sil enecies. 


CRYSTALS (ATARI only) Price: $9.95 Casseite/$13.95 Diskette 
‘Avuniqee algorithm randomly produces facinating graphics plays accomparied with nes which vary a the pater are bat, NO 
{eo pavierne ae the same, ahd the combined effect of the sound tnd graphic are me 
Mote to demontave the wound and cole features of the Aan 


CRANSTON MANOR ADVENTURE (North Star only) 
‘At nt! A comptthensne Adventure game fer the North Star. CRANSTON MANOR ADVENTURE takes yoo it 
Mere you stems io gather fabulous Weasuten Luthing isthe manor are wild annals asd robes who 


crc of Adventur programs, making ths game the lop In ls cats Pay cam be wopped at any tine and the sata 
fed om Suet Regu 128 


NORTH STAR SOFTWARE EXCHANGE (NSSE) LIBRARY Price $9.98 Diskette 
DYNACOMP now dhiibutes the 20 volume NSSE btrary, Most of thee dikete offer an outstanding value forthe purchave price 
Write Yor Gtatyregatding the coaten of tha Kbrary and goastity(fout Or more putchaies 


BUSINESS and UTILITIES 


‘than 1100 entries (male density North Stat or Appie DOS 3.2 over 2300 with double demity NorthStar or Apple DOS 3.3)! 


FORM LETTER SYSTEM (FLS) (Apple and North Star diskette only) Price: $17.95 
FLS may be employed to generate iodvidually adresse fore letters, The user creas the adres file and separately compos the es 
fer, FLS will then print form letters using each addres, FLS ix completely compaie with MAIL LIST Il, which may be wed 1 
‘manage your addres files, 


PLS and MAIL LIST Il are available asa combiced package for $3795. 


‘TEXT EDITOR I (Letter Writer) Price: $14.95 Cassette/S18.95 Diskette 
‘An easy to une, ite oriented text eitor which provides variable tine widths and simple paragraph indenig. This tet editor i iealy 
‘ited foe compouing eters and fs quite capable of handling much lager Jobs, Avaluble forall computes 


PERSONAL FINANCE SYSTEM (ATARI only) Price: $34.95 Diskette 
FS is singe dak menu oriented system composed of 10 programs designed 1 orgaize and simplify your perseal nance. Features 
‘eclade + 300 transaction capacity; fast accet, 26 epioeal wie coder; data teneval by weosth, code or payee: optional printing of 
‘reports; checkbook Balancing; Bat gr4ph plating and more. Alo provides on ibe Gsette is ATARI DOS 2 


FINDIT (North Star only) Price: 519.95 
This 4 thee-n-oee program which maintain information acesite by Neywotds of thre types: Personal (eg last same), Comme 
ial eg: planters) and Reference (ep: magazine article, rcord albums, et) In adtion to Keyword searches there ae Dethday, a 
‘iverary and apposstment teaches forthe personal records and appointment searches forthe commercial records. Reference records 
fre accetcd bya hinge heyword or by cosbreferercing two of three beywords, 


DFILE (North Star only), Price: 519.95 
Thit bandy program allows North Star wsrs ro mala a specialized data base of al files and programs inthe tack of dths which in 
‘ariably accumulates. DFILE i easy to et up and use. twill organize your dihs to provide efficent locating ofthe ders file ot pro 
gam 


COMPARE (North Star only) Price: $12.95 
‘COMPARE isa single disk uty software package which compares two BASIC programs and dapays the file sites ofthe programs in 
byte, the lengths interas of the numberof statement ines, abd the line aumbers at which various fated differences occur. COMPARE. 
‘perms the user to examine versions of his software io verify which are the more current, and 1 cleat identify the changes made du. 
Ing developenen 


COMPRESS (North Star only) 
‘COMPRESS is sngle dak tty program which removes ll unsecenary spaces and (optioeally) REMark statements from Noth Sta 
BASIC programs, The source Mile Is procested one Line a a time, th perting vy large programs to be compressed wing tly & 
small amount of competer memory. File compressions of 20-40% ate commonly achieved 


GRAFIX (TRS-80 only) 


TIDY (TRS-80 only) Price: $10.95 Cassette/$14.98 Diskette 
TIDY isan aniembiy language program which allows you to renumber the lies in your BASIC programs. TIDY aso removes ws 
recenary spaces and REMark watements. The results» compacted BASIC program which wes mich les memory space and exrcutn 
Aipnicanty faster Once loaded, TIDY remains in memory; you may load any numberof BASIC programs withoat having to reload 
tov 


STATISTICS and ENGINEERING 


DATA SMOOTHER (Not available for ATARI) Price: $14.98 Cassette/S18.98 Diskette 
“Ths special da rom nol business and engineetng data which 
oothed fis and second derivative cacsltion 


FOURIER ANALYZER (Available for all computers) Price: $14.95 Cassette/S18.95 Disk 
‘Use this program to examine the frequency spectra of amid duration signals. The program features automatic wcaling and ploting of 
the npr data andres. Practical applications inclade the analy of complicated paiterns im wh fields as elecirorch, communica 
tons and busines. 


‘TFA (Transfer Function Analyzer) Price: $19.95 Cassette/$23.95 Diskette 

;pevial software package mbich may be wie to evaluate the tranferfuncioes of asters suchas fi amplifiers afters by 

i this resposie to palied input TFA is & major modifiation of FOURIER ANALYZER aed contains an engineering 

Srented decibel vert log frequency plot aswell as dita eating feature. Whereas FOURIER ANALYZER is cesgnet for eSscatonal 
and icientific we, TFA wan engineering tool. Avaliable for al! comput 


HARMONIC ANALYZER (Available for all computers) Price: $24.95 Cassette /S28.95 Diskette 
WARMONIC ANALYZER was designed forthe spectrum analy of repetiive waveforms. Features include data fle generation, 
‘sting and siorage/reiieval ss well a cata and spectrum plotting. Ove particuley unique facility i that the input data need not Be 
tually spaced or inorder. The orginal ata vores und a cubic tlie Interpolation i uted create the data ile regaled bythe FFT 
Seorihen 
FOURIER ANALYZER, TFA and HARMONIC ANALYZER may be purchased together fora combined price of $4495 three ca 
svete) anc $5698 (vee dishes). 


REGRESSION I (Available for all computers) Price: $19.95 Cassette/S23.95 Diskette 
REGRESSION Iisa unique and exceptionally versatile one-dimensional last squares “polynomial curve iting pronram. Features 
‘de very hgh accuracy an automatic degre determination option, an extenlve ternal library of fing functions; data editing; 
[uiomatic data and curve potting: a waiticl analy (eg: standard deviation, cortdatin coefficient, ee) and mca more. In ada 
‘lon, new fits may be tried without teetering ihe data, REGRESSION Is certainly the cornerstone program in any data analy oft- 
seate library, 


REGRESSION II (PARAFIT) (Available for all computers) 
PARAFIT is designe! to handle thove cases in which the parameters ate imbedded (pouibly sonine 
‘se simply isers the functional form, including the parameters (A(t), AQ), ec) al one or more BASIC statement lines. Data and 
‘ula may be manipulate and posted a4 with REGRESSION 1. Use REGRESSION | for polynomial fiting, and PARAFFT for hove 
complicated functions 


Price: $19.95 Cassette 
$23.95 Diskette 
MLR iv profesional ytware package for analyzing data ses containing two of mor linearly independent variables. Besides perform 
{he bac rere calculation thi program aso proviseseay 10 wh daa eiry storage, recheval and eitng functions. In a8 
ton, the user may inert opate the solution by supplying valves forthe independent variable. The numberof variables ad data ze 
limited only by the arable memory 
REGRESSION |, Il and MULTILINEAR REGRESSION may be purchased togetber lor $49.95 (three causettn) or 361,98 (bree 
aketen) 


MULTILINEAR REGRESSION (MLR) (Available for all computers) 


BASIC SCIENTIFIC SUBROUTINES, Volume I (Not available for ATARI) 
[DYNACOMP isthe excise distributor forthe sftwate Meyed tothe txt HASIC Sovntfc Subroutines, Volume Iby F.Ruckdescel 
(bee the BYTE/McGraw Hill averisement in BYTE magazine, Janeaty 198). These subroutines have been assembled according 19 
‘hapler. Included with each collection isa menu program which selects and demonstrates each subroatine 


Collection #1; Chapters and 3: Data and function plotting, comples variables 
CClletion 2: Chapter 4: Matrix and vector operations 
CColetion #1; Chapters Sand 6: Random number generators, series approsinations 
Price per collection: $14.95 Cassene/$I4.98 Diketie 
Ail tee coletions are available for $99.98 (three easertes) and $4998 (heee dikes) 
Uecase the tet isa vital part ofthe documentation, RASIC Scientific Subroutines. Volume fi avilable from DYNACOMP fot 
$19.95 plus 786 postage and handling 


ROOTS (Available for all computers) Price $9.95 Cassette/$13.95 Diskette 
ln 4 sutidell, ROOTS uemakaseostly determines ll the zeroes of « polynomial having ral coefficients. There sno lit onthe degree 
‘ofthe polynomial, ard becaste the peocedure erative, the accuracy sgeeerally very good. No intial poses are reguted a iepst, 
[ind the calculated root are substituted back into the polynomial andthe reduals dsplayed. 


Availability 


DYNACOMP softwares supplied with complete documentation containing cea explanation and examples. leu ctherwse specified, al 
rograms il fun althon 16k program memory space (ATARI requires 4K). Except where noted programs ae availabe on ATARI, PET, 
TRS 80 (Level i) and Apple (Apples) cassette and diskette a well at NorthStar hrgle deny (Zouble density compatibe) Skette, AS 
Honaly, most programs can be Obtained on standard (IBM format) F" CP/M floppy diks for systems runnieg under MBASIC 


© ATARI, PET, APPLE Il, TRS-80, NORTH STAR, CP/M and HAM ore regatered ire names end/or iedemarks 


Ordering Information 


All orders ate processed and shipped posspaid within 48 hours. Please enclose payment with order along with computer information. I pay 
tng by VISA or Master Card, include al mbes on cad, For orders outude North America add 10% for shipping and handling 


‘Ada $2.50 to dtbest price for 8" lappy disk (IBM format soft yestored, CP/M, Microsoft BASIC) 
‘TRS-40 disheties are not supplied with DOS oF BASIC. 


Deduct 10% when ordering 3 or more programs. 


Ask for DYNACOMP programs at your local toftmare dealer, While for delalled descriptions of these and other programs foe 


Dynacomr 
DYNACOMP, Inc. 
6 Rippingale Road Dept. E 
Pittsford, New York 14534 
24 hour mail order phone: (716)586-7579 
Office phone (9AM-SPM EST): (716)442-8960 


‘New York State residents please add 7% NYS sales tan, 
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The chip select pins must be controlled by the 
address decoding circuitry in your microcomputer 
system, or else you must add your own address 
decoding circuitry to produce the chip select pulses. 
Since I have an AIM 65 system, I used one of the 
device selects available on the expansion connector, 
namely DS9. This signal is active at logic zero for 
any address in the range $9000 to $9FFF. It was tied 
to CSI, the active-low chip select. If CS@ is tied to 
+5V, then the registers on the 6551 are selected by 
any address of the form $9XX0 to $9XX3 where 
XX is a ‘‘don’t care’? number. Thus, in the pro- 
grams you will find the four 6551 registers selected 
by addresses $9400 to $9403. If you have a SYM-1 
you can make use of device select DS18. If you have 
an Apple you must provide your own decoding cir- 
cuitry. The reason lies in the fact that the device 
select pulses generated by the Apple for the 
peripheral cards have been logically ANDED with 
@,, and consequently they do not become active early 
enough in either the READ or WRITE cycles to 
work with 6500 family devices. For a discussion of 
address decoding see De Jong’s “) book. The circuits 
are generally quite simple. In the case of the Apple, I 
suggest trying an inverter and a 74133 to generate a 
device pulse for say $CO8X, and perhaps a 74LS245 
as a data bus buffer. Try an inverted 0, to replace 
0,. My familiarity with the PET does not justify sug- 
gesting any circuits, but I am sure the 6551 can be 
interfaced to a PET. 

We turn next to the signals on the right-hand 
side of the 6551 as it is shown in Figure 1. The RXC 
input to the 6551 is the easiest to explain because it 
is not used in this application. The remaining pins 
have labels that are almost identical to the RS-232C 
designations. In fact, the only one that is different is 
the DCD which is simply CD (Carrier Detect) in 
RS-232C lingo. Again, refer to references (2) and (3) 
for a more complete explanation of the RS-232C in- 
terface. 

Although the signal designations on the 6551 
ACIA are almost identical to the RS-232C labels, the 
signal levels are not, and some arrangement must be 
made to transform the TTL levels of the 6551 to the 
RS-232C signal levels. We chose to use integrated 
circuits designed expressly for that task, namely the 
1488 and the 1489 line driver and line receiver. Note 
that the 1488 requires a positive and negative supply 
voltage as well as ground. Also, the RS-232C ground 
(pin 7 on the DB-225 connector) should have the 
same ground as the 1488 and the 1489. The connec- 
tions in Figure 1 that are found on the right-hand 
side of the figure made up a rather complete RS- 
232C serial interface that may be used to interface to 
a variety of peripheral devices. Furthermore, the fact 
that the data format and Baud rate of the 6551 are 
under the programmer’s control makes this an ex- 
tremely flexible RS-232C interface. 

Since computer communication by telephone is 


the subject of this article, a modem is required. 
There are a variety of modems with RS-232C inter- 
faces on the market and we do not wish to make any 
recommendations about them. I purchased a Nova- 
tion Cat because that appears to be one of the more 
popular devices. Skyles Electric Works and other 
advertisers in COMPUTE! offer modems for sale. In 
any case, my Novation Cat requires the signals 
designated in Figure 1 in addition to the signal 
ground. Other modems may require the DTR and 
RTS signals so we have shown the correct TTL-to- 
RS-232C interface in the event you may need these 
signals. 

This completes our description of the circuit and 
we turn next to a simple program that is supposed to 
allow communication to take place using the 6551 
ACIA. 


Ill. A Simple Communications Program 

A program that was designed to allow two people to 
communicate over telephone lines with their com- 
puters is given in Listing 1 and a flowchart is shown 
in Figure 2. This program is very simple and very 
slow, and it is offered here merely as a way to test 
the circuit, the program, and the modem. Eventual- 
ly, one would want to construct more elaborate 
routines to transfer information quickly. Our interest 
here is in experimenting for the sake of learning. 
Hence there is no necessity for encryption devices, 
bells, whistles or even parity checks. 

Here is how it is supposed to work. The caller 
loads the program and places his modem in the 
originate mode with full-duplex operation selected. 
He loads the indirect jump location with the vector 
$0F 13 so that after the program is begun, his program 
will go to the transmit loop. 

He makes the telephone call to an anxiously 
awaiting friend who also has this interface and this 
program operating. The friend has loaded the in- 
direct jump location at $0000 and $0001 with the 
vector $0F26 (remember, $26 goes in $0000 and 
$0F goes in $0001). The friend has also placed his 
modem in the answer mode with full-duplex opera- 
tion selected. After an informal chat, both friends 
put their modems into action by placing the handset 
into the muffs (assuming acoustic modems). The 
originator begins to type a message. 

He ends his part of the message with an ‘EOT’ 
character (Control D on your keyboard). While he is 
transmitting, the friend’s program echoes the 
message back to the originator where it is read and 
printed by the computer. It’s nice to see what you 
have said, and to know that it got where it was going 
with no mistakes. When an ‘EOT” character is sent, 
it automatically transfers the originator’s program to 
the receive loop and the receiver’s program to the 
send loop, giving him a chance to retaliate. Having 
made no visible symbol to indicate when this 
changeover takes place, may I suggest sending a 
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GIFTS FROM PROMETHEUS 


NEW for APPLE II" 


Advanced products at 


Down-to-Earth 
PRICES 


DUAL SERIAL CARD-1. 
All functions of two 
independent serial 
cards on one board—plus 
more. Provides Apple II) users 
with two simultaneous asynchro- 
nous serial channels. DSC-1 appears 
as two separate logical serial cards to 
the Apple II. Fully software 
compatible with all Apple II's“ and 
Microsoft software. 2716 EPROM 
used for easy driver modification. In 
addition, the second serial channel 
supports these extra features: 
e Strapable DCE/DTE. ¢ Secondary 
RS-232 handshake functions (DCD, 
DTR, DSR) ¢ Strapable logical slot 
location and hardware looks like it’s another 
slot. Order: PP-DSC-1 @ $189.00 each. 


DUAL SERIAL/PARALLEL CARD-1. As with the Dual Serial Card-1 
(above), the Dual Serial/Parallel-1 provides Apple users with simultaneous 
use of one full serial port and one paraiel port. Both ports strapable for 
any Apple peripheral slot. Fully compatible with all Apple and Softcard 
(CP/M) software. Drivers for serial interface and Centronics parallel 
interface are contained in modifiable industry standard EPROM. Serial 
port is configured like DSC-1. Order: PP-DSP-1 @ $189.00 each. 


MEMORY EXPANSION MODULE-1. Expand your Apple I!")to a full64K 
RAM system with highest quality 16K dynamic RAMS. Fully buffered to 
provide reliable operation — even with fully loaded Apples. Total compati- 
bility with Microsoft Softcard®!/CP/M® and all Apple software. Supplied 
complete with installation instructions and test program. 

Order: PP-MEM-1 @ $149.50 each. 
PASCAL MT+ MEM-1. A modular native Z-80 code Pascal compiler. 
ISO standard. Includes a MEM-1 (detailed above). Have a full Pascal 
compiler at half the Apple price. Requires a Microsoft Softcard’) and two 
disk drives. Note that the Pascal MT+ alone is normally $250.00. 

Order: PP-PMT-1 @ $299.00 each. 
16K RAM ADD-ON KITS. For TRS-80 and Apple II, Eight (8) full- 
specification industry standard 16K RAMS. These are not seconds. 

Order: PP-RAK-16 @ $29.00 each. 


All Prometheus boards are completely tested and burned-in prior to shipment. 

One-year warranty covers parts and labor. MONEY BACK GUARANTEE: Order 

now without risk. Boards may be returned, in good condition, after up to 10 days 

of trial for a full and prompt cash refund. California: add 6% tax; BART Counties, 

6%2%. Orders under $150, add $3.00 postage, for handling charge. 

Freight allowed on orders over $150. Dealer inquiries invited. — 22] 
Quantity discounts available. 
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PROMETHEUS PRODUCTS INCORPORATED 
4509 Thompson Ct. e Fremont, CA 94538 © (415) 791-0266 


Registered Trade Marks: (1) Apple Computers, Inc. (2) Microsoft Consumer Products (3) Digital Research, Inc. 
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Listing 1. An Experimental Communications Routine. 


$OFO0 A9 OB 


OFO2 8D 02 94 


START 


LDA #$0B 


Initialize the 6551 by loading the 
command 


STA CMNDRG register (see 6551 spec sheet for 


Load the control register for 8-bit 


details). 
OF05 A9 13 LDA #$13 
word 
OF07 8D 03 94 STA CNTRG length and Baud rate of 110. 
OFOA 78 SEI Prevent interrupts. 
OFOB D8 CLD Clear decimal mode. 
OFOC EA NOP A mistake of mine. 
OFOD AD 01 94 LDA STATUS 


OF10 6C 00 00 


Clear any interrupts on the 6551. 


JMP (THERE) Jump to transmit loop to transmit, 


receive 


OF13 203CE9 TXLOOP JSR KYBD loop to receive. Get a character 
from the 

OF16 20 FO OF JSR TXMIT _ keyboard read routine. Send it to 
the 6551 

OF19 C9 04 CMP #EOT’ transmit subroutine. If an ‘‘End of 
Transmission’’ 

OF1B FO 09 BEQ RXLOOP (Control D) is sent, branch to 
receive loop. 

OF1D 20 E0 OF JSR RCVDAT Get the echo from the receive 
subroutine. 

OF20 20 7A E9 JSR OUTPUT Output it to your own printer to see 
what you 

OF23 18 CLC sent. Force a jump back to 
TXLOOP 

OF24 90 ED BCC TXLOOP and get another character to send. 

OF26 20 EOOF RXLOOP JSR RCVDAT Wait for a character to be sent. 

OF 29 C9 04 CMP #EOT’ Is he finished with his transmis- 
sion? 

OF2B FO E6 BEQ TXLOOP Yes, then go to transmit loop. 

OF2D 20 FO OF JSR TXMIT Echo the character that was sent. 

OF30 20 7A E9 JSR OUTPUT Output the character to your 
printer. 

OF33 18 CLC Force a jump back to RKLOOP 

OF34 90 FO BCC RXLOOP and get another character when it is 
sent. 
Subroutines 
OFEO AD 0194 RCVDAT LDA STATUS Read the status register to see if a 
word 

OFE3 29 08 AND #$08 has been received, otherwise wait 
for one. 

OFE5 FO F9 BEQ RCVDAT 

OFE7 AD 00 94 LDA RCVRG_ Get the word from the receiver 
register. 

OFEA 60 RTS Return to the calling program. 
OFFO 48 TXMIT PHA Save the accumulator temporarily 
OFF1 AD 0194 WAIT LDA STATUS Is the transmitter register empty? 
OFF4 29 10 AND #$10 No. Wait until it is. 

OFF6 FO F9 BEQ WAIT 

OFF8 68 PLA Get the character from the stack. 

OFF9 8D 00 94 STA TMTRG Store it in the 6551 transmit 
register. 

OFFC 60 RTS Return to the calling program. 
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INITIALIZE 
THE 
6351 
INDIRECT Icer CHARACTER] 
jumpto A WITH RECEIVE 
‘A LOOP SUBROUTINE 


© 


EE 


TRANSMIT 


ECHO IT WITH 
SUBROUTINE 


RECEIVE 
LOOP 


PRINT 11 
WITH OUTPUT 
SUBROUTINE 


GET “ECHO” 
FROM RECEIVE 
SUBROUTINE 


Figure 2. Flowchart of the 
Transmit/Receive Program. See text 
for details. 


question mark, or perhaps there is some CB lingo 
that suggests it is the other person’s turn to talk. If 
all else fails, pick up the handset and holler 
something. Do not change your modem from its 
original answer or originate mode. 

So back and forth the conversation goes. Once 
you have the transmit option in your hands nothing 
can stop you from talking until you send an ‘EOT” 
and give your friend a chance to say something. 
Clearly, the program lacks a certain elegance (it may 


not even work, in which case it lacks a whole lot of 
elegance), but maybe it will get some fun started. By 
the way, the originator of the phone call usually gets 
the phone bill. 

Study the flowchart and the program listing. 
The program begins by intitializing the 6551. An 
eight-bit word (TTY compatible) is used, with the 
parity check disabled, and one stop bit is sent. The 
Baud rate chosen here is 110, but it should be possi- 
ble to go to 300 Baud. Both participants must have 
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the same rate. Next, the program jumps to either the 
receive loop or the transmit loop depending on the 
vector loaded into $0000 and $0001. This was a 
crude way to start, but it should work. 

In the transmit loop the program first waits for 
an input from a keyboard read routine. The address 
in the program belongs to an AIM 65 monitor 
subroutine that returns the ASCII representation of 
the depressed key in the accumulator. This character 
is sent by calling the transmit subroutine which loads 
the 6551 transmit register with the character. The 
6551 takes over and sends the character. The pro- 
gram then waits for the character to be echoed from 
the other telephone and computer. The echoed 
character is printed to make sure that what was sent 
was actually received. Then control returns to the 
keyboard subroutine to wait for the next character to 
be sent. 

In the receive loop the program jumps to the 
receive subroutine that watches the 6551 until a 
character is in the receive data register. If this 
character is an ‘EOT” then control goes back to the 
transmit loop and you may begin transmitting. 
Otherwise the received character is immediately 
echoed back to the sender and also printed with your 
OUTPUT routine. Again, the address of the OUT- 
PUT routine in Listing 1 belongs to an AIM 65 
subroutine. Both the KYBD and OUTPUT 
subroutines must be supplied by the user’s monitor 
or the user himself, otherwise the program in Listing 
1 is complete. 

While in the transmit loop, the selection of the 
‘EOT’ character by the sender will automatically 
transfer control out of the transmit loop into the 
receive loop. Note again that no bells or whistles 
have been programmed to occur when you send an 
‘EOT’ character, so if you are transmitting you bet- 
ter let your friend know you are passing control of 
the system to him. 

So hopefully all this will work. If it doesn’t you 
have only me to blame, and I will not assume the 
cost of your labor or your equipment to conduct this 
experiment. Perhaps it would be best if you waited 
until someone else tried it; think it over before you 
take the plunge. 

Besides, my next project is to launch a 6502 
Communications Satellite using dynamite in my back 
yard and you may want to save your money to buy 
shares in that enterprise. 
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TAKE THE ? OUT 
OF SOFTWARE BUYIN 


ri 


MICRO Co-op 


© Objective reviews and comparisons of 
software available for your computer 
© Co-op prices 


Call or write for more information 
and a free Buying Guide/Catalog 
MICRO CO-OP 
Post Office Box 432 
West Chicago, Illinois 60185 

(312) 231-0912 


Include your name, address, and the type of computer you own. 


Selectric® Interface System 


Easny interfaced to any IBM Selectric I, 
II, or Ill. 


TOP spinning your wheels. Letter qual- 
ity at an affordable price. 


Connects via Parallel or RS-232, ac- 
commodates varied handshaking. 


Omy $575 to $599. Dealer inquiries in- 
vited. 


New design provides added features. 


ESCON Products, Inc. 
12919 Alcosta Blvd. 
San Ramon, Ca., 94583 
(415) 820-1256 


Microcomputer Measurement And 
Control For PET,APPLE,KIM and AIM65 


ar 


The world we live in is full of variables we want to 
measure. These include weight, temperature, pressure, 
humidity, speed and fluid level. These variables are 
continuous and their values may be represented by a 
voltage. This voltage is the analog of the physical 
variable. A device which converts a physical, 
mechanical or chemical quantity to a voltage is called 
a sensor. 

Computers do not understand voltages: They 
understand bits. Bits are digital signals. A device 
which converts voltages to bits is an analog-to-digital 
converter. Our AIM 16 (Analog Input Module) is a 16 
input analog-to-digital converter. 

The goal of Connecticut microComputer in 
designing the uMAC SYSTEMS is to produce easy to 
use, low cost data acquisition and control modules for 
small computers. These acquisition and control 
modules will include digital input sensing (e.g. 
switches), analog input sensing (e.g. temperature, 
humidity), digital output control (e.g. lamps, motors, 
alarms), and analog output control (e.g. X-Y plotters, 
or oscilloscopes). 


Connectors 


The AIM 16 requires connections to its input port 
(analog inputs) and its output port (computer inter- 
face). The ICON (Input CONnector) is a 20 pin, 
solder eyelet, edge connector for connecting inputs to 
each of the AIM16’s 16 channels. The OCON (Output 
CONnector) is a 20 pin, solder eyelet edge connector 
for connecting the computer’s input and output ports 
to the AIMI6. 

The MANMOD! (MANifold MODule) replaces 
the ICON. It has screw terminals and barrier strips for 
all 16 inputs for connecting pots, joysticks, voltage 
sources, etc. 

CABLE A24 (24 inch interconnect cable) has an 
interface connector on one end and an OCON 
equivalent on the other. This cable provides connec- 
tions between the uMACSYSTEMS computer inter- 
faces and the AIM 16 or XPANDRI and between the 
XPANDRI and up to eight AIM 16s. 


Analog Input Module . 
The AIM 16 is a 16 channel analog to digital converter 
designed to work with most microcomputers. The 
AIM 16 is connected to the host computer through the 
computer's 8 bit input port and 8 bit output port, or 
iho one of the uMAC SYSTEMS special inter- 
‘aces. 

The input voltage range is 0 to 5.12 volts. The in- 
put voltage is converted to a count between 0 and 255 
(00 and FF hex). Resolution is 20 millivolts per count. 
Accuracy is 0.5% + 1 bit. Conversion time is less 
than 100 microseconds per channel. All 16 channels 
can be scanned in less than 1.5 milliseconds. 

Power requirements are 12 volts DC at 60 ma. 


POW1 


The POW1 is the power module for the AIM16. One 
POW1 supplies enough power for one AIM16, one 
MANMODI, sixteen sensors, one XPANDRI and one 
computer interface. The POW! comes in an American 
version (POW1a) for 110 VAC and in a European ver- 
sion (POW1e) for 230 VAC. 


TEMPSENS2P 


10°F TO 10°F 


This module provides two temperature probes for use 
by the AIMI6. This module should be used with the 
MANMODI for ease of hookup. The MANMOD1 
will support up to 16 probes (eight TEMPSENS 
modules). Resolution for each probe is 1°F. 


Remote Controller- 
Clock and Calendar 


AN INEXPENSIVE CONTROL 
SOLUTION FOR 


HOME SECURITY * ENERGY CON- 
SERVATION ¢ GREENHOUSES 

¢ ENVIRONMENTAL CONTROL 

¢ INDUSTRIAL CONTROL 

¢ LABORATORIES 


SUPER X-10 MOD SPECS 


1, Remote controller 
Controls up to 256 different remote devices by sen- 
ding signals over the house wiring to remote 
modules. Uses BSR remote modules available all 
over the USA (Sears, Radio Shack, etc.). Does not 
fequire BSR control module. Does not use sonic 
ink. 
2. Clock/calendar 
Time of day - hours, minutes, seconds 
Date - month, day - automatically corrects for 
28,29,30 and 31 day months. Day of the week. 
3. Digital input/outputs 
8 inputs - TTL levels or switch closures. 
Can be used as a trigger for a stored 
sequence. 
8 outputs - TTL levels 
Power supply included 110VAC only. 


XPANDRI1 


The XPANDRI allows up to eight Input/Output 
modules to be connected to a computer at one time. 
The XPANDR! is connected to the computer in place 
of the AIMI6 or X10 MOD. Up to eight AIM16s or 
seven Aim 16s and one X10 MOD are then connected 
to each of the eight ports provided using a CABLE 
A24 for each module. 


For your convenience the AIMI6 and the X10 MOD come as part of a number of 
sets. The minimum configuration for a usable system is the AIMI6 Starter Set 1 
which includes one AIMI6, one POWI, one ICON and one OCON. The AIMI6 
Starter Set 2 includes a MANMODI in place of the ICON. The minimum configura- 


for many computers. 


tion for a usable system is the X10 MOD Starter Set which includes one X10 MOD, 


AIMI6 
SUPER X10 MOD (110 VAC only) 
POWla (POWer module-110 VAC) 
POWle (POWer module-230 VAC) 
ICON (Input CONnector) 
OCON (Output CONnector) 
MANMODI (MANifold MODule) 
CABLE A24 (24 inch interconnect 
cable) 
XPANDRI (allows up to 8 Input or 

Output modules to be connected to a 


computer at one time)... . 2.62 6s esse ener eee eee 59.95 
TEMPSENS2P 1 (two temperature probes, 
-10°F to 160°F). . 


LIGHTSENS IP! (light level probe) . 
The following sets include one AIM16, 

one POWI, one OCON and one ICON. 
AIMI6 Starter Set 1a (110 VAC)... 
AIMI6 Starter Set 1e (230 VAC). . 


All prices and specifications subject to change without 
notice. Our 30-day money back guarantee applies. 


The following sets include one AIM16, 

one POW1, one OCON and one MANMODI. 
AIM16 Starter Set 2a (110 VAC)... 
AIMI6 Starter Set 2e (230 VAC).. 
The following modules plug into their respective 
computers and, when used with a CABLE A24, 
eliminate the need for custom wiring of the computer 
interface. 


PETMOD (Commodore PET) . 49.95 
KIMMOD (KIM,SYM) 39.95, 
APMOD (APPLE II) .. 59.95 
TRS-80 MOD (Radio Shack TRS-80) 59.95, 
AIM65 MOD (AIM 65) «0... 002-2000 39,95, 


The following sets include one AIM16, one POW1, one 
MANMODI, one CABLE A24 and one computer inter- 
face module 

PETSET1a (Commodore PET - 


PIOVA CS oes sks Sass aac anion ediocis-secienne sinner 295.00 
PETSET le (Commodore PET - 
ZBOVAGC) ois.ois :c5 cistern y oie sibs 4.6 dias al eoleie's eisaio erm 305.00 


one ICON and one OCON. These sets require that you have a hardware knowledge 
of your computer and of computer interfacing. 
For simple plug compatible systems we also offer computer interfaces and sets 


KIMSET 1a (KIM,SYM,AIM65 - 
110 VAC) . 


230 VAC) 
APSETIa(APPLE II - 110 VAC)... 
APSETIle(APPLE II - 230 VAC) .. 
TRS-80 SETla (Radio Shack TRS-80 - 
110 VAC) 
TRS-80 SETle(Radio Shack TRS 
230 VAC) . 
AIM65 SET1a(AIM65-110 VAC) .. 
AIM65 SET 1e(AIM65-230 VAC) 
The following sets include one X10 MOD, one 
CABLE A24, one ICON and one computer interface 
module. 
PETSET2(Commodore PET) .. 
KIMSET2(KIM,SYM) . 
APSET2(APPLE II) .. 
TRS-80 SET2 (Radio Shack TRS-80) 
AIM65 SET2 (AIM65) .......- + 
SUPER X10 MOD/XPANDRI 
have aSET]) ....-.-.+e.se0 E 


295.00 
- 285.00 
295.00 
295.00 
- 285.00 


Printer And Communication Interfaces For The CBM/PET 


SADI For Serial SADI - The microprocessor based serial and parallel interface for the 
Two-wa Commodore PET. SADI allows you to connect your PET to parallel 
wo Y and serial printers, CRT’s, modems, acoustic couplers, hard copy ter- 
i i minals and other computers. The serial and parallel ports are indepen- 
Communication, dent allowing the PET to communicate with both peripheral devices 
Parallel simultaneously or one at a time. In addition, the RS-232 device can 
. communicate with the parallel device. 
Printers, Special Features for the PET interface include: 
and Serial Conversion to true ASCII both in and out 
3 Cursor controls and function characters specially printed 
Printers Selectable reversal of upper and lower case 


Addressable - works with other devices 


Special Features for the serial interface include: 
Baud rate selectable from 75 to 9600 
Half or full duplex 
32 character buffer 
X-ON, X-OFF automatically sent 
Selectable carriage return delay 
Special Features for the parallel interface include: 
Data strobe - either polarity 
Device ready - either polarity 
Centronics compatible 


ADA1600 e For Parallel NEC rare por etme a ae Asem sed 
i 


and Centronics Standard Printers SADIe (230VAC) $325 


The ADA1600 is a low cost easy to use interface for the Commodore Computers. It allows the PET and CBM computers to use standard Centronics type printers (in- 
cluding the NEC 5530) for improved quality printing. The ADA1600 has a two foot cable which plugs into the PET IEEE port. Another IEEE card edge connector is 
provided for connecting disks and other peripherals to the PET. The ADA1600 is addressable and does not tie up the bus. The address is switch selectable. A four foot 
cable with a standard 36 pin Centronics connector is provided. A switch selects upper/lower case, upper/lower case reversed (needed for some Commodore machines) 
and upper case only for clearer program listings. Works with WORDPRO, BASIC and other software. No special programming is required. The case measures 3 1/2 x 
F Sl ere assembled and tested, with case and cables. Power is obtained from the printer or an external power supply may be used. Retail price 
for the is $129. 


ADA1450 @ Serial Printer Adapters 


The ADA1450 is a low cost, easy to use serial interface for the Commodore Computers. It allows the PET and CBM computers to use standard serial printers for im- 
proved quality printing. The ADA1450 has a two foot cable which plugs into the PET IEEE port. Another IEEE card edge connector is provided for connecting di 
and other peripherals to the PET. The ADA1450 is addressable and does not tie up the bus. The address is switch selectable. A six foot RS-232 cable is provided with a 
DB25 connector. Pin 3 is data out. Pins $,6 and 8 act as ready lines to the printer. Pins 4 and 20 act as ready lines from the printer. These lines can be switched for 
non-standard printers. Baud rate is selectable to 9600 baud. A switch selects upper/lower case, upper/lower case reversed (needed for some Commodore machines) and 
upper case only for clearer program listings. Works with WORDPRO, BASIC and other software. No special programming is required. The case measures 3 1/2 x 5 
3/4 inches. Comes complete, assembled and tested, with case, cables, power supply and softy are on cassette for graphing functions, formatting data ete. The ADA1450 
has a female DB25 connector at the end of the RS-232 cable for most standard printers. The ADAI45ON has a male DB2S at the end of the RS-232 cable for the 
DIABLO serial printers. Retail price for the ADA1450 or 1450N is $139. 


ADA730 Parallel @ For the Centronics 730 and 737 Printers 


The ADA730 is a low cost easy to use interface for the Commodore Computers, It allows the PET and CBM computers to use Centronics type 730 and 737 printers. 
The ADA730 has a two foot cable which plugs into the PET IEEE port. Another IEEE card edge connector is provided for connecting disks and other peripherals to 
the PET. The ADA730 is addressable and does not tie up the bus. The address is switch selectable. A cable with a 36 pin card edge connector is provided. A switch 
selects upper/lower coase, upper/lower case reversed (needed for some Commodore machines) and upper case only for clearer program listings. Works with WORD- 
PRO, BASIC and other software. No special programming is required. The case measures 3 1/2 x 5 3/4 inches. Comes complete, assembled and tested, with case and 
cables. Power is obtained from the printer or an external power supply may be used. Retail price for the ADA is $129. 


QUANTITY DESCRIPTION PRICE TOTAL 


Word Processor 
Program ° 


PET Word Processor. On tape - 
$39.50, On disk - 49.50 


For 8K Pets 29.50 
For 16K and 32K Pets 39.50 


Compose and print letters, flyers, | SUBTOTAL 
ads, manuscripts, etc. Uses disk or 


tape, 30 page manual included, Handling and shipping — add per order $3.00 
Foreign orders add 10% for AIR postage 
Conn. residents add 7% sales tax 


TOTAL ENCLOSED 
NAME 


ADA400 BDRES 


CmG 
SOFTWARE 


Program 


0 0 6 
ims RS-232 : 
‘Cr 
: To Current sre ae 
© # Loop VISA O M/C O Expiration date 


vm ES 


RS-232 to current loop adapter (ADA 400). ADA4005 - Solder Pads 24.50 
$29.50 ADAG4OOB - Barrier Strips with screw 
Two circuits - 1 each direction. Run an RS-232 _ terminals 29.50 

device off a computer's teletype port or vice 

versa. Optoisolated. 


Adapter Card number 


Mention this magazine and deduct 2% from the TOTAL 


In the US order from: Connecticut MicroComputer, Inc. 


34 Del Mar Drive Brookfield, CT 06804 (203) 775-4595 Connecticut microComputer, Inc. 
In Canada order from: Batteries Included, LTD 34 Del Mar Drive, Brookfield, CT 06804 


71 McCaul St. F6 Toronto, Canada M5T2X1 (416)596-1405 203 775-4595 TWX: 710 456-0052 
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Basics 
of Light Pen 
Operation 


Robert A. Peck 

Manager, Technical Support to 
Advanced Manufacturing 
Memorex Corporation 


Manufacturers of personal computers are attempting 
to make the computer more easily accessible to the 
public. In doing so, various means have been tried, 
such as games, simple home budget programs, and 
the like. The entry format for each of these had, for 
the most part, been by means of the keyboard, or a 
game paddle of some kind. 

Just recently, the trend toward light pen 
“‘menu’’ selection for ease of data entry has been 
tried. Let’s look at the actual techniques which could 
be employed to implement this type of input device 
on a personal computer. The hardware and software 
requirements will be discussed here. The reader, 
after studying these techniques, may be able to con- 
struct a working form of a light pen with as little as 
$5.00 worth of materials. 

First a note about the definition of a light pen. 
It does not emit light... rather it is intended to sense 
the light of an illuminated area on the TV monitor 
screen. As a photo-sensitive device, some form of 
output of the light pen will occur as a result of the 
electron beam energizing a portion of the phosphor 
of the screen, thus causing it to glow. 

To clarify this a bit further, the picture on a TV 
screen is not all produced at exactly the same time 
by a single ‘‘photo’’ flashed on the screen. Instead it 
is made up of a single electron beam being swept 
from left to right (and down and up) across the 
screen, with its intensity varied as it sweeps across 
the screen, to form the picture we see, one line at a 
time. In this manner, the sweeping beam produces 
30 or 60 complete pictures per second on the TV 
screen. Our own visual system enables us to perceive 
the screen as though the entire surface of the screen 
was continuously lit, thus forming a complete pic- 
ture. The persistence of the screen, the time it re- 
mains bright after the beam has passed a particular 
location, is minimal for most monitor screens. 

Let’s act, for the moment, in the same manner 
that the light pen will act. Imagine, if you will, tak- 


ing a small cylindrical tube and placing it against the 
surface of a fully illuminated TV screen. If we place 
our eyes at the opposite end of this tube, and restrict 
our vision only to what is at the end of the tube and 
not to the rest of the screen, we are in a position to 
make a judgement about what is going on in our 
narrowly restricted view of the world. 

Now we must imagine either that we are able to 
speed up our ability to perceive rapidly the changing 
intensity of the light on the area of the screen in 
front of us or that the beam slows down to our level 
of perception. Either position is ok for our purposes. 

As we are looking into the end of the tube, we 
will notice that there is no light there most of the 
time. Specifically the phosphor will only be lit up ex- 
actly at the time the beam is striking it, and for a 
short time thereafter, based on the persistence of the 
screen. But of course, for the most part, we will be 
kept in the dark. This will be true at any position on 
the surface of the screen. 

Since we know that we have light for a short 
time and dark for the rest of the time, it is a yes-no 
situation and something ideally suited to being 
handled by the computer. So let’s give our eyes a 
rest and place a lens and a phototransistor within the 
tube in place of our eye. We know that the 
phototransistor will produce an output when it sees 
the light and no output when the light is absent. 


...@ very simple design will 
serve most purposes admirably. 


How complex must the circuit for the phototran- 
sistor be to allow us to make this a useful, reliable 
device? Well, it depends on the type of selection 
which we wish to make in the usage of the light pen. 
We'll soon see that for the largest percentage of 
potential uses, at least at the hobbyist level, a very 
simple design will serve most purposes admirably. 

In order to grasp the significance of the out- 
put/no output capability of the phototransistor, we’ll 
next look at the way the computer or its terminal 
device is producing the output display which we are 
seeing on the TV. 

Let’s say we have a terminal which can display 
80 columns by 24 lines of usable character positions 
on the monitor screen. In the process of output, the 
scan controller must select, each in turn, line 1 of the 
character memory, then columns 1, 2, 3, ..., all the 
way out to column 80. Then it must repeat the line 
scan for as many TV scan lines a character line is 
supposed to take up. Then it will go on to the next 
line of 80 characters, the next, and so forth, going 
back to the beginning again once all 25 lines have 
been displayed. 


GRAPHICS 


FOR 80 COLUMN PETS 
The Integrated Visible Memory for the PET 
has now been redesigned for the new 
12" screen 80 column and forthcoming 

40 column PET computers from Com- 
modore. Like earlier MTU units, the 
new K-1008-43 package mounts inside 
the PET case for total protection. To 
make the power and flexibility of the 
320 by 200 bit mapped pixel graphics 
display easily accessible, we have de- 
signed the Keyword Graphic Program. 
This adds 45 graphics commands to 
Commodore BASIC. The image <4 
on the screen was created by the #F=i---- 0" 
program below. If you have been ; sey ae 
waiting for easy to use, high == 
resolution graphics for your PET, 
isn't it time you called MTU? 


NOW 80 COLUMN PETS CAN HAVE MTU HIGH RESOLUTION GRAPHICS 


VISMEM: CLEAR K-1008-43M Manual only $10 
P=160: Q=100 (credited toward purchase) 
XP=144: XR=1.5*3.1415927 K-1008-43 Complete ready to install package 
YP=56: YR=1l: ZP=64 $495 
XF=XR/XP: YF=YP/YR: ZF=XR/ZP J 
FOR ZI=-Q TO Q-1 TER 
IF ZI<-ZP OR ZIDZP GOTO 150 MASTERCHARGE & VISA accepted 
ZT=Z1*XP/ZP: ZZ=21 Write or call toda i ibi 

y for our full line catalog describing 
XL=INT (.5+SQR(XP*XP-ZT*2ZT) ) all MTU 6502 products, including our high speed 
FOR XI=-XL TO XL 8"' Floppy Disk Controller for up to 4 megabytes of 
XT=SQR(XI*XI+ZT*ZT) *XF: XX=XI PET storage. 
YY= (SIN (XT) +.4*SIN(3*XT) ) *YF 
GOSUB 170 
NEXT XI —— 
NEXT ZI 
STOP (an ———————— 
X1=XX+Z2Z+P = Sriete 
Y1=YY-22+0 if Micro Technology Unlimited 
GMODE 1: MOVE Xl,Yl: WRPIX 2806 Hillsborough Street 
aE ae bg Raleigh, NC 27605. USA 
GMODE 2: LINE X1,Y1-1,X1,0 : fee 

s aK (919) 833-1458 


RETURN 
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From this, you can see that the scan controller 
will be continuously fetching characters from the 
character memory. Thus the different addresses of 
the different characters will each be available on the 
address bus of the scan controller at the time that 
character is being fetched for output. 

To put it another way, if our character memory 
was set up such that line 1 position 1 represented ad- 
dress 0 of the character memory and line 1 position 
80 represented character address 79, line 2 position 1 
as address 80 and line 25 position 80 as address 
1999, we would then have a specific point of 
reference to use. We now take our light pen and 
place it on the screen directly over one specific 
character position which is, let us say, occupied by a 
single solid block character such as a nonblinking 
cursor. 

Every time the phototransistor sees a light out- 
put on the screen, at the exact time it occurs, the 
scan controller address bus has, on it, the exact ad- 
dress within the scan memory occupied by the 
character which is producing the light output on the 
screen. 

Just as an example of what this address would 
mean to us, consider the following example. Suppose 
that at screen location 400 (first position in line 6) we 
place a cursor character followed by the description .. 
“CHECKBOOK BALANCER” and at location 800 
in the scan memory we placed another cursor 
character labeled ‘‘TREK’’, we can place the light 
pen over the cursor character representing the 
specific program which we wish to have called in 
next and will expect the light pen scan program to 
provide us with the data required to do it. In this 
case when the light pen senses an output, the address 
of either position 400 or 800 will be on the scan posi- 
tion address bus, ready to be picked up for use by 
our program. We know that if our program finds 400 
on the bus, it must next call in the Checkbook Pro- 
gram. Conversely, if it finds 800 on the bus, it must 
retrieve the Startrek Program. 

Now if we wanted to do so, we would add some 
additional hardware to our terminal which would act, 
in association with the phototransistor output, to cap- 
ture the address present on the bus at the time a 
light output is sensed. As an exercise, let’s examine 
some of the hardware this would require. 

First we need something to capture the scan ad- 
dress from the controller bus and a way to transfer it 
to the data bus of the computer. A set of three 
74175’s could be used here. Each is a 4-bit tri-state 
latch, where the input (capture side) would be con- 
nected to the scan memory data bus and the output 
(storage side) would be connected to the computer 
data bus for later retrieval. The control lines for the 
latches would have to be connected in some manner 
to the light pen through a flip-flop of some kind to 
assure only a single sampling of the address from the 
scan counter per application of the light pen to the 


The best features of this technique 
are the simplicity of the 
software required and the 
non-critical nature of the 
components of the light pen... 


screen. The tri-state control lines would be connected 
to the address decoders of the computer so that it 
could retrieve any one of the three 4-bit stored parts 
of the scan address after it was triggered. 

It might, at first glance, seem a pretty 
straightforward approach to follow, but let’s look at a 
few of the drawbacks. The first would be the critical 
control of the level of light intensity sensed by the 
pen. Specifically, it could possibly be accidentally 
triggered either by an outside source of light, or by 
the phosphor persistance (as little as there is) when 
we first place the pen against the surface of the 
screen. In either case, the address we sense on the 
scan control bus does not really represent the actual 
address of the sample point we are trying to isolate. 
This might entail some special circuitry to be added 
to sense only the rising edge of the beam light inten- 
sity, where that rising edge has a specific rise time, 
and therefore not trigger on an outside incandescent 
light source operating on a 60 Hz sine wave. 

To complicate matters further, even though we 
succeeded in developing this type of edge sensitive 
equipment, we still run into some problems with 
fluorescent light sources in the area, in that these 
have a very fast rise time and have a phosphor 
afterglow as well. Both items make the light from the 
fluorescent vary in a manner similar to that of the 
TV screen. Our software could, of course, compen- 
sate for this, but combined with the hardware re- 
quirements, we have selected a really complex task. 
One more area of difficulty, just to mention it here, 
is the inability to accurately sense the difference in 
address locations between two adjacent, or very near- 
ly adjacent, squares on the screen unless special cir- 
cuitry is added for the rise-edge, as described above. 

Fortunately, there is a way to absolutely 
minimize the amount of circuitry needed to establish 
a workable light pen, along with a way to minimize 
the complexity of the software which has to go along 
with it. In addition, the pen needs only to accept a 
source of power and ground from the computer, and 
will need only a single bit input port to operate fully. 
Some manufacturers suggest the use of the same pad- 
dle input for the light pen. Below is described the 
technique which can accomplish this form of opera- 
tion. 

The best features of this technique are the 
simplicity of the software required and the non- 
critical nature of the components of the light pen, as 
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SORT is a 6502 machine language in-memory sorting algorithm of commercial quality for PET and APPLE owners. Most 
sorts are accomplished in less than a second and large sorts take only a few seconds. The algorithm is a diminishing increment 
insertion sort, with optionally chosen increments. There are no conditions under which SORT performance degenerates or fails. 

SORT requires almost no user set-up operations. SORT handles integer, floating-point, and string arrays plus arrays of 
more than one dimension. In addition, multi-key sorting of string arrays has been enabled. The user may specify the character 
within a string to begin sorting on and how many characters are to be evaluated. SORT is capable of performing up to twenty of 
these multi-key sub-sorts (on matches found) at the same time. 

SORT on the PET: SORT is available for large-keyboard PETS only. One EPROM fits all newer 40 6 80 column PETS. 
SORT EPROM comes at hex $9000, $A000, or $B000 socket. EPROM with SORT and text dump is $55.00 (postpaid). 

SORT on the APPLE II via a quality slot independent EPROM board. Board includes function driver that supports 16 
EPROM based functions for user EPROMS. APPLE EPROM card with SORT, text screen dump and function driver is 
$110.00 (postpaid). MASTERCHARGE & VISA accepted. 


POR 


by MATRIX in EPROM for the PET and APPLE II. 


MATRIX software, imc. 315 Marion Avenue, Big Rapids, MI 49307 (616) 796-2483 


A Complete Line of Software for Small Businesses. 


32 K BYTE MEMORY SS Se 
RELIABLE AND COST EFFECTIVE RAM FOR ONLY $58 


6502 & 6800 BASED MICROCOMPUTERS 
AIM 65-*KIM*SYM A EXDY. AND ALL OTHER, 16K 


DYNAMIC SYSTEMS USING 


PET*S44-BUS MK4116-3 OR EQUIVALENT 
DEVICES. 


+ PLUG COMPATIBLE WITH THE AIM-65/SYM EXPANSION sine = 
CONNECTOR ‘BY USING A RIGHT ANGLE CONNECTOR 200 NSEC ACCESS, 375 NSEC 
(SUPPLIED) MOUNTED ON THE BACK OF THE MEMORY 5 CYCLE 
MEMORY BOARD EDGE CONNECTOR PLUGS INTO THE > BURNED-IN AND FULLY 
Connects 70 PET Of KIM USING - : i TESTED 
CT: KIM USING AN ADAPTOR CABLE 
RELIABLE DYNAMIC BRAM WITH ON BOARD INVISIBLE i 1 YR. PARTS REPLACEMENT 
H—LOOKS LIK! "ATIC MEMORY BUT AT 7 Sa GUARANTEE 
LOWER COST AND A FRACTION OF THE POWER Be 
REQUIRED FOR STATIC BOARDS. QTY. DISCOUNTS AVAILABLE 
USES -5V ONLY, SUPPLIED FROM HOST COMPUTER 
FULL DOCUMENTATION. ASSEMBLED AND. TESTED i 
TEED FOR ONE YEAR AND 
PURCHASE PRICE IS FULLY REFUNDABLE IF BOARD IS . ; ALL ASSEMBLED BOARDS -TAND 
RETURNED UNDAMAGED WITHIN 14 DAYS. é 1 MEMORY CHIPS CARRY A FULL ONE 
ASSEMBLED WITH 32K RAM $395.00 YEAR REPLACEMENT WARRANTY 
& WITH 16K RAM $339.00 : 
TESTED. WITHOUT RAM CHIPS $279.00 E 
H, T ( CHIPS) T _— 
WITH BOARD AND MANUAL $109.00 i = x = 
BARE BOARD & MANUAL $49.00 Pe. 2 2 i COMPUTER DEVICES 


AUF onS tee Cama ee Oaailn ce 00566 
4K OR 8K LE, BOARD 
STANDOFFS, POWER SUPPLY MODIFICATION. KIT AND ORANGE, CA 92668 
COMPLETE INSTRUCTIONS. $49.00 - 5 = (714) 633-7280 
oo 7 ss Calif. residents please add 6% sales tax. Mastercharge 

U.S. PRICES ONLY & Visa accepted, Please allow 14 d: 

clear bank. Phone orders welcome. Shipping charges 

will be added to all shipments. 
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well as the non-critical nature of the level ad- 
justments required. We also have an easy way of 
compensating for any external light source which 
may have an effect on the pen, and actually ignore 
it. Let’s examine this technique now. 

First, let us attack the problem of light sensiti- 
vity adjustment. It is proposed that, for this method 
we will work with, the pen need only be able to 
distinguish between the presence or absence of il- 
lumination within a selected square on the screen. If 
we are working within a range of light or no light, 
you can see that we will have a wide degree of ad- 
justment available and still allow the pen to operate 
perfectly well. 

With the original example, let’s say we had 
placed a menu selection box at both scan memory 
locations 400 and 800 and assume also we are using 
the simple-form light pen which plugs into the game 
paddle input. Instead of using a hardware-based scan 
technique, we will use a software based scan as 
follows. 

Assume for example that we have placed the pen 
over the square at scan location 800 and we begin 
our scan. Both the square at 400 and at 800 appear 
illuminated at this time. Therefore if the light pen is 
pointing to either one of them, during the period of 
time of the sweep of the beam across the screen, the 
light pen will put out a series of pulses coincident 
with the presence of the beam in the area occupied 
by the pen. 

Now we can begin our scan by replacing the 
selector box at scan memory location 400 with a 
blank space (no output on the screen at this point). 
We will then go to the light pen input and stay in a 
loop for about 1/60 or 1/30 second and find out if, 
during that loop, there were any light pulses output. 
If there were still output light pulses, it means that 
we had not turned off the square over which the light 
pen is resting now, so we must continue the scan. 
Then we relight the square at location 400 and pro- 
ceed to replace the square at 800 with a blank space. 
We will again loop through the test program area to 
determine if there have been any light pulse outputs 
during the time that location 800 was turned off. If 
no outputs were sensed during this time, we know 
we have found the correct location where the light 
pen is sitting. 

We can then take the address we have found 
this way and use it to control which action is to be 
done next, just as in the previous hardware con- 
trolled case, but here with a good deal less com- 
plexity. You can also see that we may have many 
many menu boxes on the screen and by this means 
accurately determine exactly which one is being ad- 
dressed by the light pen. After all, we are the one 
who is controlling whether the light pen can see a 
light output from a specific square. So if we turn off 
a square, and then see that the light pen no longer 
has an output, we know which square we just con- 


trolled and therfore we know what the required 
operation will be. 

We have then substituted a software scan tech- 
nique for both the complex hardware and complex 
software the other approach would have required. 
The primary limit in the number of menu boxes we 
can use is the amount of time which would be re- 
quired, at 1/60 or 1/30 sec per box, for the light- 
pulse-present scan per box on screen. If we have no 
concern for the time this takes, then there is little 
reason to limit the number of boxes on the screen ex- 
cept to keep them far enough apart so that the light 
pen will see the light output from only one at a time, 
maintaining the wide range of light sensitivity we dis- 
cussed earlier. 


... thus far we have substituted 
a software scan for the set 
of complex hardware. 


Speaking of light sensitivity, let’s discuss the 
way we’d handle an outside light source and ignore 
its influence in our selection of the item to be per- 
formed. First, a reminder that the single spot on the 
TV screen we are monitoring is dark for most of the 
time and is lit by sweeps of the beam only as it 
passes the area we are monitoring. Now if we con- 
sider the outside source of light, it will rather seen to 
be a continuous sequence of pulses (fluorescent) or a 
continuous single light level. In the event that there 
is some continuous pulse interference, we must ad- 
just our software to test that there are no more than 
X (let’s say 50) pulses which occur during a single 
sweep through our software scan subroutine. This 
would allow us to ignore such interference as is 
caused by either a fluorescent or an incandescent 
source. Certain types of light, such as the sun, can- 
not be distinguished by the pen as a wave, so are 
translated as a continuous level, thereby resulting in 
nearly zero (perhaps one) transitions during the time 
of a single scan. Thus, we decide that unless greater 
than one and less than 50 pen state transitions have 
occurred in one scan, we could probably assume that 
the visible part of the screen scan probably had been 
triggered by an outside source, and we can enter into 
some type of wait state, scanning the pen itself for a 
time when the correct number of transitions is sensed 
and, within the wait state loop, also scan our 
keyboard and any other alternate input device which 
may be connected to the system and intended for use 
with the particular program as an input. 

A final note about outside light sources; when 
we have the pen up against the screen, the major in- 
fluence on the pen will be the light from the screen 
alone. In this position, the pen will not be affected 
very much by the outside light. 
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So thus far we have substituted a software scan 
for the set of complex hardware. We have used a 
technique which requires very little translation of ad- 
dress sensed into work to be done. We could pro- 
bably go into the type of construction required for 
the light pen itself. 

But wait, there seems to be some griping from 
the back of the room. Yes ... Oh ... OK! The 
gentleman in the last row says ‘‘That’s ok for you 
guys who have the Visible Memory (direct access) 
display screens, but how about the rest of us who on- 
ly have the scrolling type of screen?”’ 

A fair question, I agree. All right. A scrolling 
type of screen is one where everything moves up one 
notch to make room for the bottom line once the 
screen is filled. Well, a number of these types of 
screens have the ability to move the cursor in a 
relative manner or an absolute manner. If it does 
have this capability, then the technique still works 
exactly the same way...we just have to work a little 
harder. Lets look at a quick example. 

We'll print a cursor box followed by a descrip- 
tive line on the screen, followed by a blank line, and 
repeat this for 5 selections. Now to do the cursor 
scan, we will begin from the lower left (home) cursor 
position and move-relative-cursor until we get to the 
position occupied by one of the selector boxes. Then 
we replace it with a blank space instead. Scan. Are 
there light pulses present? If not, we’ve found the 


Model EP-2A-79 Heath H-8 


EPROM Programmer 


PET ¢ APPLE ® AIM-65 © KIM-1 © SYM-1 » OHIO SCIENTIFIC 


essen” 
eerggaa 


—H wt 


Software available for F-8, 6800, 8085, 8080, 2-80, 6502, 1802, 
2550, 6809 based systems. 

EPROM type is selected by a personality module which plugs into 
the front of the programmer. Power requirements are 115 VAC 
50/60 Hz. at 15 watts. It is supplied with a 36-inch ribbon cable for 
connecting to microcomputer. Requires 1'2 I/O ports. Priced at 
$169.00 with one set of software. (Additional software on disk and 
cassette for various systems.) Personality modules are shown below. 
PartNo. Programs 

PM.() MS 2708 

PM 1 2704, 2708 

PM2 

PM.3 

PM4 

PMS IS 2516, 2716, 2758 17) 
PMS MCM68764 35.(X) 


Optimal Technology, Inc. 
lue Wood 127, Earlysville, Virginia 22936 
Phone (804) 973-5482 
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light pen position. If so, cursor backspace, put back 
the selector box, space relative cursor to the next 
selector box and repeat the process. As you can see, 
there is no basic change in the procedure, just a 
slightly different approach. 

Sir,... you do have relative cursor?! Ok then, 
at least we’ve got one satisfied customer. By the way, 
you’d probably be interested; the terminal I use on 
my machine is a scrolling type and thats why I was 
prepared for that question! 

Now for the construction of the light pen itself. 
We’ll need some kind of small cylinder to house it. 
The cylinder will have to have enough room for the 
phototransistor itself. And, it should have some room 
for a small variable resistor and a voltage comparator 
IC if we want to have it fully self-contained and 
ready to plug into the game paddle input of our 
computer. 

I have provided a sketch of the proposed con- 
struction of the pen, along with the schematic of the 
one I use. These parts I had were primarily junk-box 
components, and as a result, my total cost was about 
$1.00 (plus the software development time). You 
could probably obtain most of the components for 
$5.00 or less. 

Well, best of luck with your construction and 
testing. If you develop some interesting applications 
for your light pen, I would appreciate the chance to 
hear about them: 


Robert A. Peck 

Manager, Technical Support to Advanced Manufacturing 
MEMOREX CORP 

San Tomas at Central Expy MS 10-10 

Santa Clara, CA 95052 
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Fig. 1. Basic Inexpensive Light Sensor 


Q, Mounted in Tip of Pen 

R, Sensitivity adjustment, adjusted so that plus pulses are 
present while pen is on screen opposite a part of screen which 
is lit up. 


LM3900 Sensitivity Adjust 


Phototransistor 


Output 
Gnd 


Fig. 2. Typical Construction 


ABOUT THE AUTHOR. Bob has a BSEE from Marquette University 
and an MBA in Finance and Economics from Northwestern. He has been 

involved with computers since 1965, and has taught microcomputer courses 
for Cogswell College in Sunnyvale, CA. He has authored three booklets on 

hardware and software for the 6502-based SYM-1 Single-Board computer. 
His assignment at Memorex involves arranging a smooth transition for new 
products from development engineering to Manufacturing. 
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Getting The Most 
From Your Pet 
Cassette Deck 


Editor’s Note: There’s much of value here for any cassette user, 
regardless of machine type. A couple of asides — the new recorders 
from Commodore (the VIC version) have tape counters. The second 
point is simply a comment on Mr. Sander’s remark regarding mail- 
order computer store tapes... most are quite reliable in business 
practice and quality control. RCL. 


Louis F. Sander 
Pittslourgh, PA 


PET owners not fortunate enough to own a disk 
spend many minutes, and ultimately many hours, 
waiting for the cassette deck to finish its work. 
SEARCHING seems to take forever, and we never 
know whether the search will finish with a READY, 
or with the dreaded PLOAD ERROR. This article 
gives some practical advice on making that waiting 
time shorter, more productive, and less filled with 
anxiety. It is oriented toward the novice, and it con- 
tains much that has been explained before, although 
never to our knowledge all in one place. But even the 
most experienced PLAY presser should find 
something of value in it. We begin with a treatise on 
tape buying, proceed to information on recorder care 
and useful accessories, and end with a compendium 
of helpful hints for the recordist, librarian and 
programmer. 


What Should You Feed A PET? 

Standard cassettes can be had at prices from under 
50¢ each to over $5.00, and it seems impossible to 
know which ones to buy. Since the typical PET 
owner will end up with dozens of tapes in his library, 
knowing a bit about cassettes can be quite important 
— we want to be sure that ours will perform reliably, 
without contributing to the loss or ruin of valuable 
programs, but we don’t want to pay extra for quality 
we can’t really use. (After all, most of us are saving 
up for that disk system.) A careful study will show 
that there are three main areas of difference among 
cassettes, each of which we’ll discuss here: playing 
time, mechanical construction, and type of magnetic 
tape. 

First, playing time. Every cassette is marked 
with a number such as C-30, C-60, C-90, etc. The 
digits after the ‘C’ tell how many total minutes of 
playing time there are on both sides of the tape. A 
C-30, for example, has two 15-minute sides, for a 
total of 30. Even though the longer tapes cost very 
little more than the short ones, for most PET owners 
the C-30 is the longest one to buy. One side of a 
C-30 will hold at least six long (8K) programs, and 
can be fully rewound in about 60 seconds. A C-60 
will hold twice as many programs, but it gets tedious 


to search through all that tape to find the one you’re 
looking for; the rewind time is longer, too. The 
C-90’s and above tend to be made with very thin 
tape that likes to break, or to let data leak through 
from one side of the tape to the other, either of which 
can ruin your program and your day. Probably the 
best size is the C-10, which is not widely available, 
but which holds one or two programs on a side, and 
which nicely minimizes search time. 

Cassette construction is less obvious than the 
other two factors, but it does bear some discussion. 
Cassette housings range from sloppily molded boxes 
to finely assembled mechanisms with bearings and 
other anti-friction devices. Most housings are glued 
together, but some are assembled with screws. Many 
experienced PET users prefer the screw type, which 
can be taken apart for emergency untangling of 
tapes. (That can be a big factor when the fouled tape 
has your latest masterpiece on it.) Sloppy construc- 
tion is most often found in off-brand discount store 
cassettes, and it should be avoided, since a sloppy 
housing tends to let the tape escape and be mangled 
by your recorder. In general, the more expensive 
cassettes have better housings, and are easier to re- 
wind or fast forward, but you should have little trou- 
ble with any but the very poorest housings. 

The finest and most expensive magnetic tape 
has a chromium dioxide (CrO,) coating, and should 
not be used in the PET. It requires special circuitry 
that the PET doesn’t have, and its greater 
abrasiveness can cause rapid wear to tape-handling 
parts. The next step down is extra-quality tape with 
a ferric oxide coating, usually selling for $2.50 -$5.00 
or more per cassette; this tape is designed to give a 
very wide frequency response in stereo recording and 
playback. It will work fine in the PET’s monophonic 
recorder, but its premium quality doesn’t add much 
to performance, and for many people the extra qual- 
ity is not worth the extra price. The same can be 
said of the ‘‘certified’’ computer cassettes in this 
price range. Your PET doesn’t need ‘‘computer 
quality’ tape, or leaderless tape, so why pay extra 
for it? 

Further down the line is garden-variety ferric 
oxide tape with a well-known audio or electronics 
brand, usually sold for under $2, or much less in 
multi-packs. For most PET owners, this is the best 
combination of price and performance. The tape is 
designed for monophonic recorders like the PET’s, 
and it has the uniform quality usually found in well- 
known brands of any product. The widely available 
Radio Shack Concertape, starting at 3/$1.99, is a 
good example of this kind of tape. Also in this price 
range are the cassettes sold by mail-order computer 
stores that cater to PET owners. There are some real 
advantages to these cassettes — the price is right, 
they are available in the convenient C-10 size, and 
they are usually screw-assembled. But there can be 
risks, too. Some mail-order computer stores are 
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THE STAR MODEM 


From Livermore Data Systems 


RS232 MODEM SALE $135 
IEEE488 MODEM SALE $245 
RS232 CCITT $170 
. IEEE 488 CCITT $280 


STAR Modem is the price performance leader with a full 
2 YEAR FACTORY WARRANTY. 


Bette HOWELL 


DE PACLUSIVELY FOR HELL ® cay 


@oppic computer inc. 


EBS Business System for PET/CBM 

Extremely comprehensive package for small business. 
Fully integrated inventory and accounts receivable system 
including invoices, packing slips, mail labels, statements, 
bank deposit slips, and 17 reports. Allows any of 10 
standard letters to be merged with customer record info on 
either a selective or complete file basis. Demo disk and 


PET/CBM full featured 60 command system by Michael 
Riley. Uses either tape or disk and any printer. Includes 


7.45 10/6.95 50/6.55 100/6.15 
8.40 10/7.95 50/7.35 100/6.90 
5.15 10/490 50/4.45 100/4.15 
6.45 10/6.10 50/5.75 100/5.45 
7.90 10/7.40 50/7.00 100/6.60 
3.45 20/3.35 100/3.25 
415 20/3.95 100/3.75 

9.90 5/9.45 10/8.90 


6502A 
6520 PIA 
6522 VIA 
6532 
2114-L450 
2114-L200 
2716 EPROM (5 volt) 
TMS 2532 EPROM 23.50 
4116-200 as RAM 8 fer 30.00 
S-100 Wire Wrap 2.65 


CASSETTES — AGFA PE-611 PREMIUM 

High output, low noise, 5 screw housing, labels. 

C-10 10/5.65 50/25.00 100/48.00 
C-30 10/7.30 50/34.00 100/66.00 
All other lengths available. Write for price list. 


4 PART HARMONY MUSIC SYSTEM for PET 
Allows you to easily enter, display, edit, and play 4 part 
harmony music. Includes whole notes thru 64 ths (with 
dotted and triplets), tempo change, key signature, 
transpose, etc. The KL-4M unitincludes D toA converter 
and amplifier (add your own speaker). 


KL-4M Muse Board with VMM Program $59.90 


115 E: Stump Road 


Montgomeryville. PA 18936 215-699-5826 A B Compute 


KMMM Pascal for PET $75 
Subset of standard Pascal with true machine language 
translator for faster execution. 16K with tape or disk. 


EARL for PET (disk file based) $65 


Editor, Assembler, Relocater, Linker to generate relocat- 
able object code. 


fullFORTH+ for PET/CBM $65 
A full-featured FORTH with extensions conforming to Forth 
Interest Group standards. Includes assembler, string process- 
ing capabilities, disk virtual memory multiple dimensioned 
arrays, floating point and integer processing. 


| c commodore | = | 


; =a 
CBM-PET SPECIALS ; ae 
& Up to $235 FREE 
& merchandise with purchase of 
f following CBM-PET Items! FREE 
$1795 235 
1795 235 
795 15 
995 150 
1295 205 


8032 32K - 80 column CRT 

8050 Dual Disk Drive - 1 megabyte 
8N Full size graphics keyboard 

16K Business or Graphic Keyboard 
32K Business or Graphic Keyboard 
2040 Dual Disk Drive - 343,000 bytes 1295 205 
2022 Tractor Feed Printer 795 100 
C2N External Cassette Deck 95 12 
CBM Voice Synthesizer 395 50 
wn--------- WRITE. FOR SYSTEM PRICES 


***EDUCATIONAL DISCOUNTS*** 
Buy 2 PET/CBM Computers, receive | FREE 


WordPro 3 - 32K CBM, disk, printer 170 
WordPro 4 - 8032, disk, printer 255 
0ZZ Data Base System for CBM 8032 335 
VISICALC for PET, ATARI 170 
BPI General Ledger, A/P, A/R for PET/CBM 270 


Programmers Toolkit - PET ROM Utilities 34.90 
2 Meter IEEE to IEEE Cable 43.00 
PET Spacemaker Switch 24.90 
Dust Cover for PET 6.90 
JEEE-Parallel Printer Interface for PET 105 
IEEE-RS232 Printer Interface for PET 149 
The PET Revealed 17.00 
Library of PET Subroutines 17.00 


Source Hookup 88 
Over 1000 programs and services available. 


Add $1 25 pet order for shy 
on all prepaid orders, Pric 


MIPLOT Intelligent Plotter 
by Watanabe Instruments (Digiplot) 


SPECIAL 
$1145 


Has all intelligent functions for producing graphs and 
drawings including 8 vector and 4 character commands. 
Solid and broken lines can be specified Character gen 
erator for alpha, numeric, and symbols. Characters can be 
Totated in 4 orientations, and can be 16 sizes. Coordinate 
axes drawn by specifying graduation interval and number 
of repetitions. Parallel ASCII interface, 11 x 17 paper. 


FLEX-FILE Data Base for CBM/PET $60 
Random file handling system with Report Writer and 
Mail Label Handler. By Michael Riley a¥e 


DISKS 9 | 


(write for quantity prices) 
SCOTCH (3M) 5%” 10/2.90 50/2.80 100/2.70 
SCOTCH (3M) 8” 10/2.95 50/2.85 100/2.75 
Maxell 514” 10/4.25 50/4.10 100/3.95 
Maxell 8” Disks 10/4.65 50/4.50 100/4.35 
Verbatim 514" 10/2.45 50/2.40 100/2.35 
(add 1.00 for Verbatim 5%" plastic storage box) 
Verbati Dbl Dens §10/3.45 50/3.35 100/3.25 
BASF 5%’ 10/2.60 20/2.50 100/2.40 
BASF 8" 10/2.65 20/2.55 100/2.45 
Diskette Storage Pages 10 for 3.95 
Disk Library Cases 5%" - 2.15 


EPSON MX-80 Printer 
STARWRITER Daisy Wheel Printer 
Centronics 737 Printer 
NEC Spinwriter - parallel 
XYMEC HI-0 1000 Intelligent Daisy Wheel 
Leedex Video 100 12" Monitor 
ZENITH DATA SYSTEMS 
Zenith Z19 Terminal (factory asm.) 
Zenith Z89 with 48K 
SYM-1 
SYM BAS-1 BASIC or RAE-1/2 Assembler 
KTM-2/80 Synertek Video Board 
KIM-1 (add $34 for power supply) 
‘Seawell Motherboard - 4K RAM 
Seawell 16K Static RAM - KIM, SYM, AIM 


8" - 2.85 


ATARI 800 $777 
All Atari Modules 20% OFF 


ATARI EDUCATIONAL PLAN — Write for detalis. 


AP Products 15% OFF 
AP Hobby-Blox 15% OFF 


ALL BOOK and SOFTWARE PRICES DISCOUNTED 
The 8086 Book (Osborne) $12.75 
78000 Assembly Language Programming $10.60 
PET Personal Computer Guide (Osborne) $12.75 
PET and the IEEE-488 Bus (Osborne) $12.75 
6502 Assembly Language (Osborne) $ 9.90 
Programming the 6502 (Zaks) $10.45 
6502 Applications Book (Zaks) $10.45 
6502 Software Cookbook (Scelbi) $ 9.45 
CP/M Handbook (w/ MP/M) Zaks $11.85 
WRITE FOR CATALOG. 
e ! UPS surface charge: 
h discount basis Regular 


prices slightly higher 
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shaky operations with flaky quality control and fluky 
business practices. A good policy with these tapes is 
to try them if it suits you, but keep a close eye on 
what you get. 

At the bottom of the list are the tapes you 
should avoid — the ones sold in discount stores, with 
brands you never heard of in audio or electronics. 
These are not much cheaper than Concertapes, and 
the tape inside is sometimes uneven and dirty. For 
most of us, the risk of getting junk is not worth the 
savings, so we should stick with something better. 


Looking Out For Tape #1 

Every tape head needs periodic maintenance, and the 
two on your PET are no exception. Experts recom- 
mend cleaning and demagnetizing tape heads after 
every ten hours of use, and you do yourself a big 
favor by following their advice. If you neglect these 
important tasks, sooner or later you’ll begin to notice 
frequent LOAD ERROR messages, and you may 
permanently damage every recording you pass by the 
head. Tape head tolerances are measured in micro- 
inches, and it’s very common for an invisible buildup 
of oxide residues to cause major signal losses, often 
leading to LOAD ERRORs. It’s also common for 
recording heads to become magnetized after a period 
of use, especially if the recorder power is cut while 
doing a SAVE. A magnetized head partially erases 
every tape that is run past it. A dirty head can 
scratch tapes. Remember, a good head session takes 
only about 1010, minutes, and it clears your head for 
another 0A, hours of use, so it’s well worth the 
effort. 

To start your maintenance program, get a bottle 
or spray can of tape head cleaner and a package of 
swabs. It’s helpful, too, to get a small angled mirror, 
so you can inspect the heads while you work on 
them. Also get a head demagnetizer, of the type that 
plugs into the wall. (The cleaners and demagnetizers 
that look like cassettes are not as effective as the 
other types, and some poor ones can actually damage 
your head, so we suggest that you avoid them.) All 
these items can be purchased, often in kit form for 
under $20.00, at any good audio or electronics store. 
Sometimes you can borrow them from a friend who’s 
into stereo or home computers. 

When maintenance time comes, follow the in- 
structions that come with the cleaner, and thoroughly 
swab the heads, tape guides, capstan and pinch 
roller, all of which you can get to by unplugging the 
PET and depressing the PLAY control. If you can’t 
identify which parts to clean, any knowledgeable 
stereo salesman can show you the corresponding 
parts on his equipment, and that should be enough 
to get you started. Next, demagnetize the heads, 
meticulously following the instructions that come 
with your demagnetizer. Particularly avoid cutting 
power to the demagnetizer when it is anywhere close 
to a head, or you may magnetize it yourself. Keep 


your tapes at least 5 - 6 feet away from the 
demagnetizer at all times, or you may accidentally 
erase them. Remember that magnetic fields pass 
easily through everything but steel, and that a 
wooden desk drawer can hide tapes from you, but 
not from your demagger. 


Useful Tape Accessories 


The most useful tape accessory is a second recorder, 
but not the kind that plugs into the Second Cassette 
Port. You will gain many enjoyable minutes by using 
an extra recorder of any kind to search or rewind one 
tape while LOADing another. When searching, just 
play the tape until you hear the high-pitched leader 
tone, and start it right there on your PET. The 
buzzsaw sound after the leader tone is the actual pro- 
gram material. If your extra recorder has a tape 
counter, you can use it to keep track of program 
locations on the tape, and further lessen your 
SEARCHING time. If it has the Cue/Review 
feature, you can listen to the recorded material while 
rewinding or fast forwarding, which is also very 
helpful in finding things. If your recorder has a built- 
in microphone, make or buy a short-circuited plug to 
fit the MIC jack and cut out the microphone; that 
will let you erase selected areas on your tapes, which 
is useful if you’re recording over other material and 
getting a lot of VERIFY ERRORs. Without the 
built-in mike, you don’t need the shorting plug. 

The extra recorder, used in audio mode, can 
help you type in programs from COMPUTE! and 
other sources, too. Just read the program aloud into 
the microphone, carefully enunciating every comma 
and semicolon, then play it back to yourself and type 
in the program as you hear it. This is a super 
method for proofreading programs that don’t work. 

Another useful accessory is a bulk eraser, for 
quickly erasing tapes when you want to re-use them. 
Mine is a Nortronics Sound-Off, a permanent 
magnet unit that works by just sliding the cassette 
through a slot. Most of them plug into the wall, and 
work like head demagnetizers, but on a grander 
scale. Be careful with bulk erasers — they create a 
strong magnetic field that can erase your good tapes 
if they are anywhere close by. 

The stores have many other items you might 
find worthwhile. Radio Shack has a slick manual 
rewinder. The Sams book ‘‘Tape Recording for the 
Hobbyist’’ and the Nortronics ‘‘Recorder Care 
Manual”’ are good sources of useful information. Ad- 
vanced tape hobbyists may also like to have a tape 
splicer and a head alignment tape, but these are 
beyond the needs of most of us. 


Tape Handling Tips 

1. Running new tapes back and forth a few times 
before using them will minimize binding and 
breakage. Erasing tapes before re-use will minimize 
read errors due to ‘“‘junk’’ on the tape. Breaking out 
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Announcing 


from the publishers of 


COMPUTE! 


The Journal For Progressive Computing 


Small System Services, Inc. is pleased to announce publication of a 
new quarterly magazine exclusively for the new VIC® computer. 


Home and Educations! 


COMPUTING! , editorially and physically of the same high quality as 
COMPUTE}, will premier with an April/May/June issue. Every issue will 
be full of useful applications material and learning aids. 


Our staff of Contributing Editors already includes some of the best 
authors in the industry: Jim Butterfield, Tory Esbensen, Harvey 
Herman, and David Thornburg, to name a few. 


GSMPUTING! will teach, entice, and interact with readers to help users 
develop maximum benefit from the new VIC® personal computer 
series from Commodore. 


Reserve your first issues now by filling out the form below. 


Ee Trial subscription. ml 
Please send me the first three quarterly issues 
of 1981 for the introductory price of $5.00. 
Sample issue. 
Please send me the first issue at an 
introductory price of $2.00. 
| already own a computer. 


Address inquiries and 
correspondence to: 


Combo Tinc: | 
P.O. Box 5406 | 
G b »NC 27403 
Greenebore, Ne LR me ee = 
| 
| 
| 
| 
| 


Neme | 


| don't yet own 8 computer but want to 
learn more about them. 


Robert C. Lock, Address 
Editor/Publisher City State Zip 


Charge my: MC. 


Visa 


expires /. 


Payment enclosed 


Bill me. $1.00 billing charge will be added. | 


Home and 


Eoucations! 
COMPUTING? ...., comPUttt one crocemorts of Smar Syaterns Se 


46 COMPUTE! 


March, 1981. Issue 10. 


the write protect tabs on a cassette will keep you 
from writing over programs by mistake. Covering the 
write protect hole with tape will override the 
protection. 

2. Keep your tapes clean: Rewind cassettes before 
putting them aside, and never touch the magnetic 
tape itself. Always use plastic cassette boxes; the soft 
ones are cheaper and tougher, but the hard ones are 
prettier. (I use hard boxes for master tapes and soft 
ones for working copies.) Keep your cassette boxes in 
metal containers; stray magnetic fields are 
everywhere, especially around motors and 
transformers, and they can damage unprotected 
tapes. 


master copies on a separate tape in a separate room 
will keep you happy in the face of disaster. 

5. There is a small but real danger of write-through 
when programs are recorded on both sides of one 
piece of tape. You can avoid it by using only one 
side of your cassette, or by using both sides and 
recording no further than mid-tape. I usually SAVE 
one program twice on each side of a C-10. That way 
I have minimal search and rewind time, conveniently 
located second copies of each program, and no 
overlapping. 

6. During program development, SAVE your work 
frequently, so you'll have something to work with 
after an unanticipated NEW or system crash. To 


keep track of the different versions, make the date 
and time of the SAVE an integral part of your pro- 
gram’s working name: ‘‘02141015SPACEWAR’”’ fits 
into the 16-character limit, and indicates that this 
version of SPACEWAR was SAVEd on 2/14 at 10:15 
AM. If there’s ever a question, it will be obvious 
that ‘‘02141300SPACEWAR’”’ is a later version, and 
that ‘‘01312200SPACEWAR’”’ is an earlier one. 


That’s the end of one user’s notes on saving 
time and grief with your PET’s tape deck. There 
must be many other good ideas on the subject. If 
you have some, let us know about them. 


3. As soon as you SAVE a program, label the 
cassette with the program name. Half-inch masking 
tape makes an easily removable label for cassettes, 
and also fits perfectly on the edge of hard or soft 
cassette boxes. Half-inch Scotch Magic Tape makes a 
neatly erasable label for the same places. 

4. A 1K program takes about 35 seconds to SAVE, 
VERIFY, or LOAD. A 4K program takes about 90 
seconds, and an 8K program about 150 seconds, or 
2% minutes. The practice of SAVEing each program 
twice on the same tape will keep you happy in the 
face of minor malfunctions; the practice of keeping 


Beginning with the May-June 1981 issue, it will no longer be necessary for you to 
interpret the technical jargon of engineers. This bi-monthly publication wil! present 
current information in a clear, concise and readily comprehensible manner 
EDUCATIONAL COMPUTER has been created with you in mind 


EDUCATIONAL COMPUTER's main objective is to become a major informational 
exchange for not only elementary and high schools, but for colleges and universities as 
well, All of us can learn from each other, and EDUCATIONAL COMPUTER will be there 
to help spread the word. 


Announcing the magazine specifically for 
the educational user of microcomputers. 


Every classroom and every teacher will have an educational computer. 
Every classroom and avery teacher should have EDUCATIONAL COMPUTER magazine. 


Edunational 
omputer 


Subscribe early and save. If you order EDUCATIONAL COMPUTER before March 10, 
1981. you will receive the first year's subscription for $10 instead of the normal rate of 
$12 per year. The newsstand price is $2.50 per issue. 


magazine gp 


Edu ational PO Box 535, Cupertino, CA 95015. 
Computer 


maganne 


* EDUCATIONAL COMPUTER will address the impact of microcomputers 
in our schools. colleges and universities 


Enclosed is my $10 for one year (if ordered before March 10, 1981) 


Q Check G Money Order 
© EDUCATIONAL COMPUTER will cover critical issues that confront 


users of microcomputers in education. Name 


Address 


© EDUCATIONAL COMPUTER will include articles by educators City 
concerning their experiences with these new and important classroom 
tools. 


State Zip 


Canada: Same as U.S. in U.S. funds. 
Other Foreign: $18 one year only, U.S. funds. 
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APPLE 


GAMES 


Unique, Action—packed Games. 


NUCLEAR WAR Nuclear confrontation on a global scale. 


Many scenarios. 
GALAXY Pillage a 3-D galaxy collecting loot from 
captive worlds, 
STOCK MARKET Rags to riches game of buy and sell with 
computer stocks. 
ENCRYPT Challenging puzzles, 
messages. 


decipher coded 


Protect the federation. Real time 3-D 


navigation. * 


All are User—tested with HELPS Multi-player games have Single-player option 


Each... Cassette: $14.95 Diskette: $19.95 


® one-player 


| ll — ad 
software for small comreuters 


1963 Rio Grande ue 4 Boxe CASS 
tin, Ti stin, Tex. 
et ores Periz 


PET SOFTWARE 


LAS VEGAS CASINO SERIES: 
These four program: 
means for the ser 
‘options availab! 

have been used to show the cards being Gealt,t 


1-512-477-2207 


A 


ATARI’ 


ATARI SALE 


pelghten enjoyment ee anes 
1. Casino Blache: ' 
Fort Spey 809 COMPUTER $825 ALL SEEBREE'S 26% OFF 
won, fst a 400 W/16K $495 BASKETBALL $31.95 
822 PRINTER $496 SUPER BREAKOUT $31.95 
4 820 PRINTER $419 STATISTICS I $15.95 
MICROLINE-86 $699 MORTGAGE & LOAN $11.95 
STARWRITER I $1653 STAR RAIDERS $48.00 
9 pega’ Sons Jevoala Gens THO catel n ov cad sia Wid OM 5" MEMOREX DISK 10/$3@ TELELINK I eee 
ieaioestobuip la caveantrg wwii fein : 810 DISK DRIVE $559 3D SUPERGRAPHICS939.95 
& Cakes 32K MICROTEK RAM $195 SPACE INVADERS $15. 
Bele Dict Pass ral Bethe Haronay or Press wit Double Os Pee 32K AXLON RAM $275  COMPUMAX: 
s : 16K ATARI RAM $155 GENERAL LEDGER $139.95 
5 Casino Package: PAYABLES $139.95 
Allfout Casino Programs above $2495 8K ATARI RAM $95 
850 INTERFACE $185 RECEIVABLES $139.95 
STRATEGIC GAMES: LIGHT PEN $69.95 MICROHOME $79.95 
(Her ctpetanon aga youl Pe: ielon pra ora doubnwetion 815 DISK $1350.09 SUNDAY GOLF 991-25 
4 Men EOUMODONEIAPAN Pts ai te pve mae vein ing ws NEW! MAIL LIST BY MAGIC LANTERN $59.95 
Presse specty which DM sel your PET hes Runs on disk. Sort by name, zip. Select on 
Fins cao tba BGT Be pte ise ie np xcondna fo lta Checker alan Eioatet 15 character information field. Full doc- 
Grae show ne oad anal cers ach Your PET mere Na man sore oa Coe sons ae umentation included. Available now. 
» Taso tee dinetatinel T-Te0 Toa played co Jor 4 14 ‘bourtl PET plays hal ching ome DATA BASE BY MAGIC LANTERN $9995 
eeeouing ene ot ntnieges Ie dee AS Requires disk. full data base management 
roi (iene tre per piquant eric Rin Gar ee Raw Da veer RET AUS faciilites including select, sort, print, etc. 
Miatogy loroaotigameneee en ¢ Satth I $795 Available march 31. Write for description. 
A Sc cl ego pera wis Se Se FREE CATALOG & NEWSLETTER - SEND NAME, ADDRESS 
PET of against your fiends. Fast and fun 3795 We stock over 100 ATARI software 
id titles. In stock products ship 
0 fortress sro ths trait cad par. Acad ae shown using PET excel! gaps ee. within 24 hours. Prices are for 
PET lays coollopest game ical tsbect even lar ha beat plays 6 MACE ORDER GHEY? NGUDRo onesies 
Ml = A AO oe 3313 UNIVERSITY AVE. MADISON, WI 


53705 (608) 233-2026 


QUARANTEE: All programs are guaranteed to be free from ertors and to load-on any PET. Any detective tapes will be replaced free 
of charge 


VISA* 


Order From: CMS SOFTWARE, 5115 Menetee Drive, Dallas, TX 75277 


Part 3 of several 


The Mysterious And 
Unpredictable RN D. | 


Bob Albrecht and 
George Firedrake 


From a book of the same name 
by Dymax Publishing Company; 


Editor’s Note: You may 
reach Bob & George 


copyright ©1980 Dymax. by mail at: 
Permission to reprint by P.O. Box 310 
teachers for classroom Menlo Park, CA 
use is granted. 94025 


Dice Roller 

OK PET, let’s roll one die a bunch of times. We will 
simulate rolling an ordinary six-sided die. For each 
roll, the possible outcomes are 1 or 2 or 3 or 4 or 5 
or 6. 


1g REM***DICE ROLLER #1 

268 REM***FIND OUT HOW MANY ROLLS 
21g PRINT "(CLRI" ; 

226 INPUT "HOW MANY DICE ROLLS" ; N 
49g REM***ROLL ONE DIE N TIMES 
41g FOR K = 1T0N 

4268 DIE = INTC6*RNDC1)) + 1 

43g PRINT DIE, 

44S NEXT K 

459 PRINT 

999 END 


For many dice games or other uses of dice, we roll 
two dice. The outcome of a roll is the total of the 
‘spots’ or number showing on both dice. 


Fe] 7 


Your turn. Tell PET how to simulate rolling two 
dice. 


Exercise 11. Write a program to simulate rolling two 
dice, N times. 


HOW MANY DICE ROLLS? 29 


4 


UI DW 


3 
8 
1 
5 


anon 
One 


READY 
a 
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When we roll two dice, the possible outcomes are 
numbers from 2 to 12. However, they are not equally 
likely. 


¢ There is only one way to get 2. 


i) Claes 
¢ There are two ways to get 3. 
i ek 
FE) oars 
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peTIBNAL FIELD 


c Moving with You into the ’80s 
Microcomputer Courseware 


From Scott, Foresman, 


the Education Expert 


NUHDER + 


NES. JOHN 
1) ROOH 100 5 
OR GUARDIAN 

BHN AND MARY 
ADDRESS 

elo st 

toneo 

TL. ZIP S06064 


o12zs4ss789 


RNY CHANGES 


Reading Skills Courseware Series (Grades K-6) 


and Mathematics Courseware Series (Grades K-8) 


feature: 


© content correlated with basal series—to 
supplement instruction, provide enrichment 


¢ individualizing capabilities that meet each pupil's 


learning needs 

¢ motivating animation, color graphics, music, and 
speech 

© comprehensive Teacher's Guides 


School Management Applications for 

administrators feature: 

© fourteen modules, each programmed to 
streamline a specific area of school 
administrative work 

e easy information storage and access, clearly 
organized printed reports 

* program instructions in plain English, helpful 
Reference Manuals 


Scott, Foresman Module Packages 
(Grades 1-3) for Speak & Read™ Educa- 
tional Model, complete with Pupil Books, 
Teacher's Guides, and optional Work- 
books, can enhance any reading cur- 
riculum by reinforcing essential skills. 


$F Scott, Foresman and Company 


Electronic Publishing 
Glenview, Illinois 60025 


Learn more. Mail this coupon 
to receive free information. 


To Scott, Foresman Electronic Publishing 
Please send me free, full-color brochures on: 


CO) Reading Skills Courseware Series and Mathematics 
Courseware Series (E0103) 

O) School Management Applications (E0101) 

O Scott, Foresman Module Packages for Speak & 
Read™ (E0141) 


School 


Name 


Position 


School Address 


City State. ZIP Code. 
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© There are several ways to get 7. 


[+] 1+ 6=7 
[+ ] 6+1=7 
& [‘-.] 4+3=7 


And several more! 


Exercise 12. Complete the following table showing 
the number of different ways to get each possible out- 
come (2 through 12) in rolling two 6-sided dice. 


OUTCOME NUMBER OF WAYS 


1 
2 
5 


Next, we would like to compute proportions, as 
defined below (X is any outcome, 2 through 12). 


NUMBER OF WAYS 
PROPORTION FOR = TO GET OUTCOME X 


OUTCOME 


TOTAL NUMBER OF WAYS 
FOR ALL OUTCOMES 


Or, since the total for all outcomes is 36, 


PROPORTION FOR 
OUTCOME X = 


NUMBER OF WAYS 
TO GET OUTCOME X 


Exercise 13. Complete the following 
table (use a calculator!) 


OUTCOME NUMBER OF WAYS PROPORTION 
2 1 1/36 = .0278 
3 2 2/36 = .0556 
4 3 3/36 = .0833 
5 =— 

6 = 
7 — 
8 = 
9 = 
10 — 
11 oa 
12 — 


If we flip a coin, the probability of getting HEADS is 
Y% =.5. What is the probability of getting TAILS? 

Yes, we are leading up to a heavy exercise. But, you can 
probably do it! 

Exercise 14. Write a program to simulate N rolls of 
two dice. Don’t print the results. Instead, count the 
number of occurrences of each possible outcome (2 
through 12), then print this information and also 
print the proportion of each outcome. Huh? For N 
rolls, the proportion for outcome X is: 


NUMBER OF TIMES 
X OCCURRED 


N 


PROPORTION FOR 
OUTCOME X = 
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TEACHING TOOLS: Microcomputer Services 


EDUCATIONAL SOFTWARE 
FOR PET* COMPUTERS 


e Extensively tested in schools 
e Adapts the computer to the child 
e Follows sound educational practices 


ADDITION AND SUBTRACTION PROGRAMS 


The addition program has 24 problem levels; the subtraction program has 12 levels. 
Problems are presented vertically, are answered from right to left, and carrying or 
regrouping can be marked. The child receives immediate feedback, with graphics 
reinforcing correct answers. By selecting from a menu, you can set the number and 
difficulty level of the problems, time limit, and number of attempts allowed. 


LETTERS & NUMBERS PROGRAM 


Ideal for young children and special education classes, this program uses large 
letters and numbers created with PET* graphics. Your options include matching one 
or more characters, completing sequences, and filling in missing items; you may 
select letters, numbers, or both. 


MATCH GAME PROGRAM 


Use this match or concentration game for memory building and lesson reviews in 
game format. This program gives you many options. Play it with shapes, words, math 
problems and answers, and word pairs (such as synonyms or translations). Select 
sets of matches built into the program or enter your own. One to four players 
compete; single players challenge the computer. 


WRITE FOR MORE INFORMATION 


TEACHING TOOLS™ programs run on any PET’. Each program comes with complete 
instructions, is easy to use, and is GUARANTEED TO BE THE BEST AVAILABLE. 


ORDER the Addition, Subtraction, Letters & Numbers, and Match Game by sending 
$20.00 for each program, plus $1.00 per order for postage and handling. All programs 
are mailed first class. Ask for free details about programs available soon: Beginning 
Number Skills, Multiplication, Division, and Spelling. MONEY BACK GUARANTEE. 


Master Charge and Visa accepted. *PET is a trademark of 
Include card number, expiration date, Commodore Business Machines. 
and signature. N.C. residents add 3% sales tax. 


™ 
T EACHI N G TO Oo LS = Microcomputer Services In Canada, contact: 


S.E.S. Computing Inc. 
P.O. Box 12679 267 Bain Avenue 
Research Triangle Park, N.C. 27709 Toronto, Ontario M4K-1G2 
(919) 851-2374 (416) 463-5302 
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We did it, we wrote the program and ran it. Here is 
what happened. 


FREQUENCY 
means 
NUMBER OF TIMES 


OUTCOME FREQUENCY PROPORTION 


2 23 ~ 624 
3 62 - 662 
4 81 $81 
5 1p9 -169 
6 146 +14 
4 142 -142 
8 137 137 
99 126 126 
1g 8g 98 
ll 72 972 
12 a7 $27 


If you have the time, try 10000 rolls, or 20000 rolls, 
or even 100000 rolls. Compare the proportions with 
the proportions you wrote down for Exercise 13. Or, 
compare with our answers for Exercise 13. (o} 


DISK DRIVE WOES? PRINTER INTERACTION? 
MEMORY LOSS? ERRATIC OPERATION? 
DON’T BLAME THE SOFTWARE! 


Power Line Spikes, Surges & Hash could be the culprit! 
Floppies, printers, memory & processor often interact! 
Our unique ISOLATORS eliminate equipment interaction 
AND curb damaging Power Line Spikes, Surges and Hash. 
*ISOLATOR (ISO-1A) 3 filter isolated 3-prong sockets; 
integral Surge/Spike Suppression; 1875 W Maximum load, 
1 KW load any socket $56.95 
*ISOLATOR (ISO-2) 2 filter isolated 3-prong socket banks; 
(6 sockets total); integral Spike/Surge Suppression; 
1875 W Max load, 1 KW either bank 
*SUPER ISOLATOR (ISO-3), similar to ISO-1A 

except double filtering & Suppression .... $85.95 
*ISOLATOR (ISO-4), similar to ISO-1A except 

unit has 6 individually filtered sockets .... $96.95 
*ISOLATOR (ISO-5), similar to 1SO-2 except 

unit has 3 socket banks, 9 sockets total ... $79.95 
*CIRCUIT BREAKER, any model (add-CB) Add $ 7.00 
*CKT BRKR/SWITCH/PILOT {-CBS) . . . -Add $14.00 


a 5 TOLL FREE ORDER DESK 1-800-225-4876 
(Except Ma, Hi, Ak, Pr, Canada) 


4 Electronic Specialists, Inc. 
171 South Main Street, Natick, Mass. 01760 Dept. CT 


TECHNICAL & NON-800 AREAS 1-617-655-1532 
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Microphys is pleased to announce the availability of its 
educational software for use with the Commodore PET/CBM 
and Apple/Bell & Howell microcomputers. These programs 
have been successfully employed in Chemistry, Physics, 
Calculus and Mathematics classes on both the high school 
and college levels. 


The programs are supplied on C-10 cassettes and are 
accompanied by complete instructions so that even those 
with little or no computer experience may immediately utilize 
the software in their classrooms. Each cassette retails for 
$20 and may be obtained from leading computer dealers or 
directly from Microphys. 


Each Physics and Chemistry cassette has both a computer- 
assisted and individualized-instruction program recorded on 
opposite sides of the cassette. The CAI program guides the 
student through interacts with the computer and receives 
immediate evaluation of his responses and/or assistance 
when needed. The I/I program generates a unique set of pro- 
blems for each student. The computer can supply answers 
so that the student may check his own work. If the teacher 
directs the computer to suppress these answers, the student 
completes his work at home and then feeds his results into 
the computer which grades his work, supplying the answers 
to those questions incorrectly solved by the student. NOTE: 
each time a particular program is run, a different set of 
numerical values is generated. In most instances, an entirely 
new problem is presented. The Mathematic and Calculus 
cassettes have only the individualized-instruction feature. 


For those using disk drives, the programs have been 
coherently grouped and are available on diskettes. The price 
of each diskette is $180 which represents a considerable 
savings with regard to the individual cassette price. 


A partial list of the programs available appears below. 
Please write for the Microphys Winter Catalog which 
describes the complete line of educational software for use 
on the PET/CBM and Apple/Bell & Howell microsystems. 


CALCULUS CASSETTES 


PC726-Dilferentiation of Algebraic Functions 
PC727-Maxima/Minima Problems: Part | 
PC728-Maxima/Minima Problems: Part II 
PC729-Relative Rate Problems: Part | 
PC730-Relative Rate Problems: Part Il 
PC731-Integration of Algebraic Functions 
PC732-Differentiation of Trigonometric Functions 
PG733-Integration of Trigonometric Functions 
PC734-Integration: Areas of Plane Figures 
PG735-Integration: Volumes of Solids 
PC736-Integration: Arc Lengths 
PG737-Integration: Surface Areas of Solids 


Ms Calculus | Diskette-contains 726-737 


PHYSICS AND CHEMISTRY CASSETTES 


Linear Kinema 21. Series Parallel Circuit Analysis 


1 
2. Projectile Motion 22. Faraday's 

3. Momentum and Energy 23. Gram-Moleculz 

2 Energy and the Inclined Plane 28. The Mole Gon 

5. Inelastic Collisions 25. The Molarity Conc 

6. Centripetal Force 26. The Normality 

7. Pulley Systems — Machines 27, The Molality Co: 

8 Specific Heat Capacity 28. Stiochiometry: Mass/Mass 

9. Calorimetry 29. Stoichiometry: Mass/Volume 
10. Heats of Fusion/Vaporization 30. jometry: Volume/Volume 


11. Specific Gas Laws 31 
12. General Gas Laws 32. 
13. Thermodynamics | 


Thermodyni 


39. Formulas ot Gc 
20, Parallel Cireut 40. Total Internal R 


20A, Parallel Circui 


Py Physics 


Microphys Programs 


2048 Ford Street 
Brooklyn, New York 11229 
(212) 646-0140 


COMPUTE! 


Now The PET’s Know How To Share 
MUPET MULTIUSER SYSTEM 


EDUCATION 


* allows direct access to any 
programmes or data files 

* reduces media cost - one set 
of disks needed for up to 8 
users 

* disk based languages such 
as Assembler, Pascal, Word 
Processing, available to all 
users 


BUSINESS 


* true multi-station 
wordprocessing with access 
to common data files 

* cost per station drastically 
reduced 

* printer spooling is 
supported 


MANUFACTURING 


* using optional DOUBLE 
MUPET, both local and 
common IEEE devices are 
supported 

* test equipment can be 
controlled locally, while 
reports and programmes are 
managed universally 


MUPET 
USES 


NO 
NONE 
NOT ANY 
NOT ONE BYTE 


OF 
SOFTWARE 


porrrerry 


YOU CAN RUN 
ANY COMBINATION 
OF PROGRAMMES 
OR LANGUAGES 
AT THE SAME TIME 


© word processing 
e Pascal 

e Assembler 

e Future??? 


* MUPET supports any 
combination of CBM 
hardware — present or 
future — which supports the 
IEEE bus 


* MUPET plugs in externally. 

No need to open the 

PET/CBM cabinet 

* MUPET supports all existing 

and future CBM disk based 

software 

* MUPET supports printers as 
well as disks 

* MUPET supports all 


versions of Commodore 
Basic 


PET/CBM Trademark of 
‘Commodore Business Machines 


CiviD 


CANADIAN MICRO DISTRIBUTORS LTD. 


365 Main Street, Milton, Ontario LOT 1P7 | 416 878-7277 
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ACAI program 
called 

LINEAR 
EQUATION 


Peter Oakes 
Muskegon, MI 


This article is about Computer-Assisted-Instruction 
or commonly called CAI programming. My example 
program is called LINEAR EQUATION. It is writ- 
ten for an 8K PET computer. Since it uses a 
minimum of graphics I believe it could be modified 
for many other small computers. 


The Program Has These Features: 

choice of using the computer monitor or a printer. 
choice of 6 different randomly generated problems. 
problem solutions complete with step by step pro- 

cedures for solving. 


Program Description 

Lines 100-106 simply announces the program. 

Line 108 makes the RND (random number generator) truly 
random for the ‘‘older’’ original ROM PETs. 

Lines 110-122 asks if the user wants to use a printer. If this 
option is executed, then the problem question and solu- 
tion (and procedure) will be written to the printer. 
Everything else is still done on the monitor. Figure 1 
shows a sample output for a printer. Of course, a similar 
output would appear on the monitor if the printer op- 
tion is not executed. 

Lines 124-144 ask for the problem type the user wants gener- 
ated. Line 144 forces the user to answer only with a 
1,2,3,4,5,or 6. A similar control occurs in line 118 mak- 
ing sure the user answers with Y,N, or T. 

Lines 146-168 gets the random data to generate the problems. 
Line 152 generates a random number V(I) in the range 
[-11.0 to +11.0] excluding [-0.9 to +0.9] 

Lines 158-168 calculate specific problem data. 

Example: X1 = INT(-V(2)/V(1)*100 + .5)/100 calculates 
the x-intercept of a line rounded off to hundredths by 
the underlined portion of the statement. 

Line 172 opens the PET to a device (ie: opens to write to 
the monitor or printer depending on the value of U8 
from lines 114-116). Line 172 also clears the monitor if 
the printer is not used. Line 174 prints a ‘‘divider’’ bet- 
ween problems if a printer is used. Line 176 will GOTO 
the printing of the selected problem as does line 250 
print the appropriate solution. 

Lines 234-250 checks (on the monitor) to see if a solution is 
wanted. 


Note that in the printing of signs care has been taken 
to print the appropriate - or + sign. An example is 
found in the subroutine at lines 402-406 (as used 
from line 264). If T had a value of -7.2, then the 
subroutine would make T$ be -7.2 whereas if T had 


a value of 7.2, then T$ would be made +7.2 which 
assures the correct printing of T$. 

The rest of the program lines are unique to what 
each line does and would take too much space to ex- 
plain every detail. I’ll let the reader read those lines 
over on his own. I hope this program will be of value 
to the reader as CAI programs can be very helpful in 
mathematics. Figure 2 shows a complete listing of the 
program with graphics noted. 


Figure 1 


GIVEN: SLOPE = 9.2 
Y-INTERCEPT { 8-53.68 9 


FIND: ARHBY+C=@ WITH B=-1 
ALSO: -INTERCEPT. 


USING: = - Yi = MEX - XDD 
WHERE oN = SLOPE OF THE LIKE 
CALV1) = A POINT OH THE LIKE 


THN ¥+S6= 9268-8) 


Q@= 9.2% 5.6 (EQUATION) 


= 815.6: 
- 36 


“9.2 % = 3.6 


THUS { 61. @ > = A-INTERCEPT 


Figure 2 


190 PRINT"ALINEAR EQUATION":PRINT"PETER - 
OAKES, 19-1-86,7K 

192 PRINT:PRINT"PROGRAM GENERATES + 
aLINEAR EQUATION 

164 PRINT"PROBLEMS AND PROVIDES A = 
ASOLUTION 

166 PRINT"PROCEDURE. 

107 : 

ee U9=RND(-TI) :REM RANDOMIZE RND 

119 :REM USE PRINTER ? 

112 PRINT: INPUT"USE PRINTER (Y,N,T)";QS: 
3aIFQS="T"GOTO388 

114 IFQS="Y"THENU8=4 :GOTO129 

116 IFQS="N"THENU8=3 :GOTO126 

118 GOSUB392:GOTO112 

120 PRINT:PRINT"WHEN PRINTER IS READY - 73 
APRESS rSPACEf KEY 

ie GETQS$: IFOS=""GOTO122 

124 :REM PROB CHOICE 

126 PRINT"AWANT TO SOLVE A LINEAR 7 
nEQUATION GIVEN 

128 PRINT" 1. SLOPE & Y INTERCEPT 

139 PRINT" 2. SLOPE & A POINT 


Perfectly Balanced 
PET 


educational software 
from 
MICE’: ED 


\ 

AS 
oe) 
gl 


fe yl i, of ji 
an = ; f | i a we “f! ll lr 
Soe — 


More than 200 instructional programs 


| Unless otherwise specified, each one can be 
purchased for 7,95 


You may wish to order tapes by the MICRODOZEN. Any twelve $7.95 tapes can be 
purchased for $84.00. 


[ Send for free catalogue: 
Freee ee aT 'MICRO-ED, Inc. ¢ P.O. Box 24156 ¢ Minneapolis, MN 55424 
SPER oor or telephone us at (612) 926-2292 
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132 PRINT" 3. TWO POINTS 226 
134 PRINT" 4, X & Y INTERCEPTS 228 
136 PRINT" 5, PARALLEL LINE & A POINT 230 
138 PRINT" 6, PERPENDICULAR LINE & A 7 
aPOINT 232 
146 PRINT" T, TERMINATE THE PROGRAM 233 
142 PRINT:INPUT"WANT TYPE: 1,2,3,4,5,6, 234 
: aOR T";Q$: IFQS="T"GOTO388 236 
144 N=VAL(Q$) : IFN<1ORN>60ORINT(N) <>NGOTO1 238 
342 
145: 249 
146 :REM DATA -190<V(I)<106; V(1)=M & 242 
aV(2)=B IN Y=MX+B; V(3) & V(4)=X-CO 244 
3ORD'S 245 
148 FOR I=l TO 4 246 
152 V(1I)=INT(RND(1) *166+.5)/10+1: 248 
3IF RND(1)>.5 THEN V(I)=-v(I) 258 
154 NEXT I 251 
155° 2 252 
156 :REM ASSIGN VARIABLES 254 
158 X1=INT(-V(2)/V(1) *196+.5)/100: 256 
REM X-INTERCEPT 
160 Y1=INT((V(1) *V(3)+V(2))*100+.5)/190: 
aREM Y-COORD AT A POINT 258 
162 Y2=INT((V(1) *V(4)+V(2))*100+.5)/190: 260 
REM Y-COORD AT ANOTHER POINT 
164 BI=INT((V(4)-V(1) *V(3))*1E2+.5)/1E2: 262 
-REM Y-INTERCEPT OF PARALLEL SYSTEM 264 
166 M2=INT((-1/V(1))*190+.5)/100: 
aREM SLOPE FOR PERPENDICULAR SYSTEM 266 
168 B2=INT((V(4)-M2*V(3))*160+.5)/190: 268 
“REM Y-INTERCEPT OF PERPENDICULAR - 276 
aSYSTEM 272 
169 : 
176 :REM WRITE PROB 273 
172 OPEN1,U8:CMD1:IFU8=3THENPRINT"A": 274 
3GOTO176 276 
278 
280 
176 ONNGOTO186,194,206,216,226,232 
177 : 282 
180 :REM #1:M=V(1),B=V(2) ,X1=X-INTERCEPT 
182 PRINT"GIVEN: SLOPE = "V(1) 284 
184 PRINT" Y-INTERCEPT ( 0,"V(2)") 
186 PRINT:PRINT"FIND: AX+BY+C=0 WITH 286 
aB=-1 288 
188 PRINT"ALSO: X-INTERCEPT.":GOT0236 298 
189 : 
192 :REM #2:M=V(1),B=V(2) ,X1=X-INTERCEPT 291 
3 & POINT (V(3),¥1) 292 
194 PRINT"GIVEN: SLOPE = "V(1) 294 
196 PRINT" RCV) = Syl 296 
198 PRINT:PRINT"FIND: Y=MX+B 
200 PRINT"ALSO: X & Y INTERCEPTS.": 298 
3GOTO236 300 
201: 302 
204 :REM #3:M=V(1),B=V(2) & POINTS: 
a (V(3),Y1) & (V(4),Y¥2) 304 
206 PRINT"GIVEN THE POINTS: ("V(3)", 
a"y1") 306 
208 PRINT" ("v(4)", 
a"y2") 308 
210 PRINT:PRINT"FIND: Y=MX+B":GOTO236 
212: 319 
214 :REM #4:M=V(1),B=V(2) ,Xl=X-INTERCEPT 312 
216 PRINT"GIVEN: Y-INTERCEPT ( 9,"V(2)") 
218 PRINT" X-INTERCEPT ("X1",@ ) 314 
229 PRINT:PRINT"FIND: Y=MX+B":GOTO236 
222: 315 
224 :REM #5:M=V(1),B=V(2) & POINT: 316 
a (V(3),V(4)) 318 
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M$="PARALLEL" : GOSUB432 :GOTO236 


:REM #6:M=V(1),B=V(2) & POINT: 
a (V(3),V(4)) 
M$="PERPENDICULAR" : GOSUB432 


:REM WANT SOLUTION ? 

PRINT: PRINT: PRINT#1:CLOSE1 

PRINT: INPUT"WANT SOLUTION (Y,N, 
aT) ";Q$: IFQS="T"GOTO388 

IFQS$="Y"GOTO246 

IFQ$="N"GOTO378 

GOSUB392:GOTO238 


:REM WRITE SOLUTION 
OPEN1,U8:CMD1: IFU8=3THENPRINT"A 
ONNGOTO0254,276,294,318,340,356 


:REM #1 
GOSUB4198 
PRINT:PRINT"THEN Y "; 


72T=V(2): 
=GOSUB398:PRINT TS" = 


"V(1)"( xX - 4 


3B ) 
PRINT" Yo PONS Se NV (A) EX 
PRINT" B= AVL) 8X = Yoh es 


aT=V (2) :GOSUB494:PRINT TS; 
PRINT" (EQUATION) ": PRINT: PRINT 
PRINT: PRINT"IF Y=G: 9 = "V(1)"X - A 
38 ";:T=V(2):GOSUB404:PRINT TS 


PRINT" 9 = "V(1)"X "TS 
PRINT" Sp-V(1)"X = "V(2) 
PRINT" xX = "Xl 


PRINT: PRINT" THUS ("x1", 6) =a 
aX- INTERCEPT" :GOTO376 


:REM #2 


GOSUB419: PRINT 
T=Y1:M=V(1) :GOSUB418 


PRINT: PRINT: PRINT"IF X=0: Y = 5 
s"v(1)"(6) "Ds" = "pg 
PRINT" (6 ,"T$") = 4 


aY-INTERCEPT 
PRINT: PRINT: PRINT"IF Y=0: @ = 3 
a"v(1)"x "PS 


PRINT" poe = YK) SX 
PRINT" MSU) tee AX 
PRINT" Cx 8 jaa 

aX- INTERCEPT" :GOTO376 
:REM #3 
PRINT"SLOPE = M = (Y¥1-Y2)/(X1-x2) 
PRINT" = ("Y1;:T=Y2:GOSUB398: 


aPRINT T$")/("V(3); 
T=V(4) :GOSUB398:PRINT TS") 


PRINT" = "v(1) 

PRINT: PRINT"THUS IN THE EQUATION: 
a a MX + B 

PRINT" Yea 


a"v(1)"x +B 
PRINT: PRINT: PRINT" THEN 
SVCD) CPViC4) SFB 


"y2" = 5 


PRINT" "y2" = ";INT((V(1) *V(4) ) 
3*100+.5)/100;" + B 
PRINT" *V(2)" = B 


PRINT: PRINT: PRINT"THUS THE EQUATION 7 
aIs 

PRINT: PRINT" Yous "v(lyex 32 
aT=V (2) :GOSUB464: PRINT T$:GOTO376 


:REM #4 


PRINT"USING: Y = MX + B 
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COMPUTER MAGIC LTD. 
ATARI COMPUTER SOFTWARE 


(FOR ATARI 899 & 400 REQUIRES 16K MEMORY) 


New PACKAGED PROGRAMS 


HORSEWORD DERBYt™ 
COMPUTER MAGIC LTD. 
~Player against the computer 
+Action graphics 
+Attractive colors and sounds $s 14°5 
+Four levels of play 


from 
CASCADE 
COMPUTERWARE 


AVOID COMPUTER MAGIC LTD. 
+1 or 2 Player ACTION SPACE GAME 
+Great color, sound, graphic combination $14°5 
+5 play variations 
+Keep ship in quadrant while trying to t 
blast everyone. You can (including opponent) 
“THE BEST PLAYER WINS" 


TRIBOMB compuTeR MAGIC LTD. 
+ ACTION GAME 
+1 or 2 player game...just try to beat $14°%° 
the computer. 
+5 levels of play 
“THE BETTER YOU GET THE HARDER | WE MAKE IT!” 
ATARI REGISTERED TRADEMARK OF ATARI INC. 
ALL ATARI 2600, 800 & 400 CARTRIDGES & 
SOFTWARE, HARDWARE, JOYSTICKS, 


DLES ETC.SEND FOR CATALOGE. 


for Commodor®, 
Computers 


CASCADE COMPUTERWARE PRO- 
GRAMS are designed to increase your 
satisfaction and utilization of your 
Commodore Computer. Our 
professional programmers have 
created new programs for BUSINESS 
ENTERTAINMENT, EDUCATION, and 
STATISTICAL applications. Write for 
detailed information: 


CASCADE COMPUTERWARE CO., P.O. BOX 2354, EVERETT, WA 98203 
Dealer inquiries invited (206) 355-6121 


PLEASE SEND ME 
( JHORSEWORD DERBY—— 
§ wame—— 


()AVOID ——— 
H ADDRESS ()TRIBOMB 


NY Residents Add 7% Sales Tax Amount Enclosed — 
Lenawee eee eee eee ee wee ee 


SHIPDING 


From AVANT-GARDE CREATIONS ~— ~— <— ~<— 


SENTENCE DIAGRAMMING 
PARTS OF SPEECH 


PET & APPLE Il USERS 


Tiny Pascar 
Plus + 
GRAPHICS 


Includes: 

¢ 3 Levels of Difficulty, 20 sentences per level 

© Optional Record-Keeping on Data Disk 

© Optional Print-outs of Records 

© Teacher-formatted Requirements for Advancing 


The TINY Pascal System turns your APPLE II micro into a 16-bit P-machine. You 
too can learn the language that is slated to become the successor to BASIC. TINY 
Pascal offers the following: 


* LINE EDITOR to create, modity and maintain source 
* COMPILER to produce P-code, the assembly langauage of the P-machine 
* INTERPRETER to execute the complied P-code (has TRACE) 


* Structured programmed constructs: CASE-OF-ELSE, WHILE-DO, IF-THEN- to the Next Level 
ELSE, REPEAT-UNTIL, FOR-TO/DOWNTO-DO, BEGIN-END, MEM, CONST, FE 
VAR ‘ARRAY ¢ Teacher-formatted Options to Exclude Actual 


Our new TINY Pascal PLUS+ provides graphics and other builtin functions: Sentence Diagramming 
GRAPHICS, PLOT, POINT, TEXT, INKEY, ABS AND SQR. The PET version sup: ° 2 .. 
ports double density plotting on 40 column screen giving 80 x 50 plot positions. Student Option for Record-Keeping 


The APPLE Il version supports LORES and for ROM APPLESOFT owners the 
HIRES graphics plus other features with: COLOR, HGRAPHICS, HCOLOR, 
HPLOT, POL and TONE. For those who do not require graphics capabilities, you 
may still order our original Tiny Pascal package. 


TINY Pascal PLUS+ GRAPHICS VERSION- a : 
PET 32K NEW Roms cassette. .. a $55 

PET 32K NEW Roms diskette............. E $50 | 
APPLE II 32K/48K w/DOS 3,2 or 3.3. Paras $50 

TINY Pascal NON-GRAPHICS VERSIONS. i x 


PET 16K/32K NEW Roms cassette............ $40 


PET 16K/32K NEW Roms diskette. Siig aia $35 
APPLE II w/ROM Applesoft 32K w/DOS. Riuasy 
APPLE II w/RAM Applesoft 48K W/DOS. ............. -$35 


USER’s Manual (refundable with software order).........$10 
6502 Assembly Listing of INTERPRETER-graphics. ......$25 
6502Assembly Listing of INTERPRETER-non graphics. .$20 


APPLE II PLUS, 48K $19.95 
1 or 2 Disk Drives VISA/Mastercharge 


AVANT-GARDECREATIONS & PHONE: 


Dept. G9 503-845-3043 


Box 30161 
Eugene, OR 97403 NOON to 6PM. PST 


(PesTTT TITS) ABACUS SOFTWARE 
P.O. Box 7211 
Grand Rapids, Michigan 49510 
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328 PRINT"AND Ce pve") 414 PRINT" (X1,Y1) = A POINT ON 5 
322 PRINT: PRINT" THEN "v(2)" = M(®) + 3 aTHE LINE":RETURN 
aB 415 : 
324 PRINT" ‘(28 = B 416 :REM WRITE SOLUTION 
326 PRINT:PRINT:PRINT"NOW USING: 418 PRINT" Y ";:T1=T:GOSUB398: 
= EXT 1g) aYIS=TS:PRINT Y1S" = "M"™( x "; 
328 PRINT"IN Y = MX";:T=V(2): 420 T=V(3) :GOSUB398:PRINT TS" ) 
GOSUB464:V2$=T$:PRINT V2$ 422 PRINT" Sais GLI) oy iit as 
330 PRINT:PRINT" 6 = M("X1") - aT=INT (M*V(3) *199+.5) /196:GOSUB398 
a"v2s 424 PRINT TS 
332 PRINT" ";:T=X1:GOSUB398: 426 PRINT: PRINT" YS hess 
aPRINT TS"M = "Vv2$ aT=INT ( (-T1+T) *100+.5) /190:GOSUB398 
334 PRINT" M = "v(1) 428 PRINT T$" (EQUATION) ":RETURN 
336 PRINT:PRINT:PRINT"EQUATION: Y = 4 429 : 
a"v(1)"X "V2$:GOTO376 430 :REM WRITE PROB 
337: 432 PRINT"FIND: Y=MX+B THAT IS "M$" TO 
338 :REM #5 434 PRINT: PRINT" ENGI) ieee =" Yas 
348 PRINT"REWRITE "vV(1)"X - Y "TS" = G aT=V (2) :GOSUB494:PRINT TS" = G 
342 PRINT"AS Y = "V(1)"xX "TS 436 PRINT:PRINT" CONTAINING <7 
344 PRINT:PRINT:PRINT"THEN SINCE 3 a("V(3)","V(4)")":RETURN 


3aPARALLEL LINES HAVE 
346 PRINT"EQUAL SLOPES TOGETHER WITH - S 
aTHE GIVEN dy 
348 PRINT"POINT: ("V(3)","V(4)") AND kan San 
359 PRINT:GOSUB410:PRINT " 


352 T=V(4) :M=V(1) :GOSUB418:GOTO376 POR EOR ATION: 


Solve your disc probleme, buy 100% surface 


353) 3 tested Dysan diskettes. All orders shipped 
354 :REM #6 from stock, within 24 hours. Call toll FREE 
356 PRINT"REWRITE "V(1)"X - Y "TS" = (800) 285-4137 for prices and information. 
358 PRINT"AS Y= "v(x ins Sank 
360 PRINT:PRINT:PRINT"THEN SINCE - BcCiiG 
3PERPENDICULAR LINES HAVE 
362 PRINT"SLOPES THAT ARE NEGATIVE 3 EXCHANGES 
‘oothill Blvd. 
ARECIPROCALS San Luss Obispo. CA 
364 PRINT"THEN M = -1/("v(1)") = "M2 93401 (In Cal. call 
366 PRINT:PRINT"THUS TOGETHER WITH THE + , (805) 543-1037 ) 
AGIVEN 


368 PRINT"POINT: ("V(3)","V(4)") AND 
370 PRINT:GOSUB419:PRINT 


372 T=V(4) :M=M2:GOSUB418 Introducing; 
373: h 
374 :REM ANOTHER PROB ? t Rata . 
376 PRINT: PRINT: PRINT#1:CLOSE1 graphic printes 
378 py ne a peoees (Y, that performs 
aN) ";Q$: IFQS="N"GOTO 7 fs 
380 IFOS="¥"GOTO384 like the big 
382 PRINT:GOSUB394:GOT0378 guys. 
384 IFU8=3THENPRINT"A Oniy8450 “eee 
aoe sonora (plus shipping & handling) : prapmnes 
389 : . available ... 


398 :REM SUBROUTINES 

391 :REM USE (Y,N,T) 

392 PRINT:PRINT"USE T TO TERMINATE THE - 
aPROGRAM OR" 

394 PRINT"USE Y FOR YES OR N FOR NO!": 
aRETURN 

395: 

396 :REM T-->"-T",T>B OR T-->"+T",T<=G 

398 TS="-"4STRS$(T):IF T<@ THEN TS="+"+ST 


aR$ (ABS (T) ) 
460 RETURN 
401: ned for int i “ 3 
402 :REM T-->"+T",T>Q OR T-->"-T",T<=8 free contes Ungar githe oHaitebe eae oe: 

; =un ‘ % 

494 TS="+"+STR$(T):IF T<@ THEN T$= +ST “Woodpecker's” mark set for sharp graphic reproduction and 

aR$ (ABS (T) ) character set for 128 character (alpha-numeric and symbols) print- 
496 RETURN ing give full printer capabilities. 

Call today for more information or to place your phone order: 

407 : (415) 326-9100 #39 Town & Country Village, Palo Alto, CA 94301. 
498 :REM PROB HEADER We honor Master Charge, Visa, check or money order (California residents add 
410 PRINT"USING: Y - Yl = M(X - X1) eee 


412 PRINT"WHERE M = SLOPE OF THE LINE 


SYSTEMS FORMULATE CORPORATION 


30 Town & Country Village © Palo Alto, California 04301 
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Sample Execution 


GIVEN: SLOPE = -1.6 


VOINTERCEPT { @:-7.9 > 
AXABY+C=@ WITH BE-1 
ALSO: X-INTERCEPT. 


USING: Y - Yi = Kx - BLD 
WHERE =H = SLOPE OF THE LIKE 
CALL) = A POINT OH THE LINE 


THEN ¥+7.9=-160%-@) 
Vt?.9=-Le ek 


@=-L.68%-9- 7.9 (EQUATION 


IF Y=8 & 


GIVEN! SLOPE = 18,3 


FO 1.8) = 17.04 


FIND: 
ALSO 


Yate 
% & ¥ INTERCEPTS, 


USING: YY - YL = NX - Bb) 
i = SLOPE OF THE LINE 


CALAD = 4 POINT GH THE LINE 


ald > a ) = A-TNTERCEPT 


GIVEN THE POINTS: 


FIND? Y=HN+B 


SLOPE = N= (YI-V29/ C8122) 
= € 12.62 + 16,340 1.2 + 2.9) 
= 3.6 


THUS IN THE EQUATICN: = 


THEN -16.34 = 5.6 (-2.9) +8 
“10.34 = -16.24 +8 
a9 = B 

THUS THE EQUATION IS 


Y= 5.68 +5.9 


YINTERCEPT < @.-18.6 > 
S-INTERCEPT (7.07 .@ > 


GIVEN: 


FIND! VSHK+R 


=M +B 
AND (@.-1&6 >) 


“10.6 = MiG) +B 
“1&6 = 8 


@= Mi 7.87 > - 16.6 


FIND: Y=H+E THAT IS PARALLEL TO 


LOK -V-2.9=@ 


CONTAINING {-2.8 .-O > 


THEN SINCE PARALLEL LINES HAVE 
EQUAL SLOPES ara) WITH THE GIVEN 
POINT: {-2.6 .-5) AD 


USING? = - Vi = NC - XDD 
WHERE =-M = SLOPE OF THE LINE 
CALYID = A POINT ON THE LINE 


Vt S= LOCK +26) 
YtSs LOX +44 


Y= 1.9% - 06 <EQIATICN 


FIND: YSHXHB THAT 15 PERPENDICULAR TO 


1K -¥ FEL = 8 


CONTAINING << 2.1. 6&8) 


REWRITE 6.1% -VtRi =@ 
FG YoQl kt 


THEN SINCE PERPENDICULAR LINES HAVE 
SLOPES THAT ARE NEGATIVE RECIPROCALS 
THEN N= -1/{-6.1.) = 216 


THIS TOGETHER WITH THE GIVEN 
POINT: (2.1. 6.8 AND 


USING: Y- Yi = MR - XL) 
WHERE = = SLOPE OF THE LINE 
C2141) = A POINT GH THE LIKE 


¥- 6.8 CK=-2.1) 
¥- 6.8 


Y= 6% + 6.46 (EQUATION) 
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Hex 
Conversion 


Using The 6502’s 
Decimal Mode 
Jack Clarke 


Since the advent of 8 bit microprocessors, the hex- 
idecimal numbering system has been around to help 
provide a shorthand notation for binary numbers... 
remember 4 binary bits can be expressed with just 1 
hexadecimal character? (F = 1111,) 

While this shorthand notation has revolutionized 
Assembly Language coding, undoubtedly many a 
new computerist has cursed the notation as pro- 
blematical, confusing and cumbersome. 

To assist the programmer (old and new), 
elaborate tables have been generated to convert the 
radix of a number from one base to another... 
remember radix and base are synonymous? To fur- 
ther the cause of this translation, numerous programs 
have been written in higher level languages. Take a 
look at Texas Instrument’s hand-held 
“‘Programmer’’ which has gained a commendable 
respect in the programming community. Have you 
ever tried to poke or peek with your Apple without 
one of the above? 

What is this decimal mode you ask? Simply 
defined it is a clever bit of binary manipulation that 
is performed inside the microprocessor to insure that 
when you add, a ‘‘1”’ to a ‘‘9’’ that the result is ‘‘O 
with carry’ and not ‘‘A’’, (also known as BCD 
coding). In other words, 4 binary bits can express a 
decimal number 0 thru 9, (10 thru 15 is illegal). So 
an eight bit number provides numbering 0 thru 99. 

Now, let’s take a closer look at the 6502’s in- 
struction set and see how the decimal mode can help 
with this numbering conversion. 

A “‘bit’’ of examination reveals that the decimal 
mode only works when performing an add (ADC) or 
subtract (SBC) instruction. All other instructions 
simply ignore the decimal mode. Take for example 
the increment/decrement instruction. It performs an 
addition or subtraction (by one) but always in the 
binary/hex mode. Now, what would happen if we 
combined a decrement/increment instruction with an 
add/subtract instruction. The increment instruction 
would count up one in hexadecimal while the add in- 
struction would simultaneously count up in 
decimal...did I just see a hex to decimal conversion 
go by? 

How about an example? Suppose you wish to 
convert the hex number ‘‘A0”’ to the equivalent 
decimal number. (Don’t pull out your conversion 
tables yet). Follow the flow chart in Figure 1 and 
walk through the steps. First set the decimal mode 


(SED), clear the accumulator (LDA @ IMM) and 
clear the carry flag (CLC). Next, load the x-register 
with the hex number to be converted (LDX AO 
IMM). Now, the conversion starts. Decrement the 
x-register (DEX) and test for zero (BNE). If the 
x-register is >0 then add 1 to the accumulator (ADC 
1 IMM). Repeat the sequence until the x-register has 
counted down to 0. When you examine the contents 
of the accumulator you will find the decimal 
equivalent of ‘‘AO”’ sitting there quietly. If you need 
a hex equivalent of a decimal number you would 
enter the decimal number in the accumulator and 
subtract one in the decimal mode...each time you 
subtract you would also increment the x-register. See 
any similarities? 

For numbers greater than 99 you would perform 
the addition or subtraction using two or more 
memory locations and keep track of the carry flag, 
(double precision arithmetic). The X and Y registers 
could also be cascaded for extended range with 16 
bits. Conversion of 0000 thru FFFF could be easily 
implemented. 


START 
SET DECIMAL FLAG (SED) 
CLEAR CARRY FLAG (CLC) 


JMULATOR (LDA #0) 


LOAD INDEX 

REGISTER WITH HEX NUMBER 

REGISTER WITH NUMBER| 
TO B TED 


(LDX #40) 


v 


ADD 1 TO ACCUMULATOR (ADC #1) 


Vv 
ACTUAL CONVERSION 


Catpgeucs ora) DECREMENT INDEX REGISTER] (DEX) 


Poa 


INDEX REGISTER 
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The best way to familiarize yourself with this 
type of approach is to try it on your own computer. 
After gaining a little confidence in the ease of the 
conversion, you will soon find the same techniques 
incredibly helpful in more complex operations such 
as multiplication and division. Take the example of a 
program that is sampling the rate of an asynchronous 
input... By knowing the ‘‘sample time’’ of your pro- 
gram (each time you read the port) and adding that 
constant instead of ‘‘1’’ you effectively convert and 
multiply in one operation resulting in a decimal for- 
matted ‘‘total number of samples’’ 

To summarize the concept of radix conversion 
using the 6502’s decimal mode, start with zero in the 
accumulator and index register and add ‘‘1’’ to the 
accumulator (decimal mode) and increment the index 
register at the same time. You will observe the ac- 
cumulator counting up in decimal and the index 
register counting up in binary/hex. 

Say good-bye to those dog-eared tables and long 
involved conversion programs that you have been 
using. The 6502 takes another bow. © 


Are you using your 
computer in an 
interesting application? 


Write about it for 
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MIPLOT: 
the right 
plotter 

at the 
right 

price 


Designed for straight forward interface to any micro- 
computer that outputs the ASCII code, MIPLOT can even 
be used by operators with no plotter experience. 
Incorporates pre-programmed “intelligent” functions required 
for producing graphs and drawings 
Solid and broken line types can be specified 
Built in character generator for letters, numbers and symbols 
Characters can be enlarged and rotated to four orientations 
Special printer mode outputs character data as-is 
Uses commonly available hard fiber-tip pens 
Maximum plot speed approximately 2 inches per second 
Built in self-test mode 


ony°1,200 


at Systems Formulate Corporation 
(plus shipping & handling) 


Call today for more information or to place your phone order: 
(415) 326-9100 © 39 Town & Country Village, Palo Alto, CA 94301. 


We honor Master Charge, Visa, check or money order (California residents add 
6.5% sales tax) 


SYSTEMS FORMULATE CORPORATION 


‘39 Town & Country Village @ Palo Alto, California 94301 


ECHO SERIES™ sPEEGH SYNTHESIZERS 
COMPUTERS ARE SPEAKING QGUTI 


Now you can add intelligible speech to your computer 
without using vast amounts of memory! The ECHO ][™ 
speech synthesizer for the Apple” is the first of a 
series of synthesizers based on the same technology 
that made the Speak & Spell** a success. 


The initial operating system allows the creation of 
your own vocabulary with phonemes (word sounds) 
while using very little RAM memory (approx. 800 bytes 
+ 20 bytes/word). Enhanced operating systems and 
vocabulary ROMs will be offered as they become 
available. 


The ECHO ][™ comes complete with speaker, instruc- 
tion manual, and a disk containing a speech editor, 
sample programs, and a sample vocabulary. Sug- 
gested list price is $225. 


See your dealer or contact: 
STREET ELECTRONICS 


[SEG] CORPORATION 


*Trademark of Apple Computer 


3152 E. La Palma Ave., Suite C 
Anaheim, CA 92806 


** Trademark of Texas Instruments 


(714) 632-9950 
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Clearing The 
Apple Il 
Low-Resolution 
Graphics 
Screen 


Sherm Ostrowsky 


Many applications require rapidly clearing the low- 
resolution graphics screen to black (COLOR =0) or to 
some other color. In the latter case the process might 
be more accurately described as ‘‘back-grounding”’. 
Either way, this apparently simple operation can be 
done by several different methods. Each method will 
produce a distinctly different visual effect while in 
operation, although the end result will be the same. 
By doing the experiments to be described below, the 
experienced programmer can learn how to use the 
method best suited to his immediate purpose, and the 
novice programmer can learn some useful facts about 
the operation of the Apple low-resolution graphics. So 
go ahead and do the experiments on your Apple; you 
can’t hurt it by pushing the keys (even the wrong 
keys), and you can learn a lot. 

First of all, in order to see the effect of any kind 
of screen-clearing method it is best to begin with a 
screen that is loaded with colors and forms. You may 
do this in any way that pleases you; I have been using 
the following subroutine in Applesoft: 


1000 GR 
1010 FORI = 0 TO 39 
1020 FORJ = 0 TO 39 


1030 COLOR = 1 + INT(15*RND(1)) 

1040 PLOT J, I 

1050 NEXT J, I 

1060 FOR PAUSE = 0 TO 2000: NEXT PAUSE 

1070 RETURN 

Notice that this subroutine colors-in the so-called 
‘‘mixed screen’’ — the top 40 lines, but not the bot- 
tom part reserved for text. If you wish to use, and 
color-in, the whole screen (48 graphics lines), then the 
first two lines of the Applesoft subroutine can be 
amended to: 


EEN (R) 


Sy 


1000 POKE -16302,0 : POKE -16304,0 

1010 FOR I = 0 TO 47 

etc. The line of POKEs turns on the ‘‘soft switches”’ 
governing the full-screen lo-res graphics (see pages 
12-13 in the new Apple II reference manual). 

Now that the screen is colored, let’s clear it. The 
first method which is likely to occur to the average 
programmer is to write a couple of lines in Applesoft. 
Suppose you want to clear the screen to a particular 
background color, say C (C = 0 to 15). A program to 
do this for a mixed screen might look like this: 

10 GOSUB 1000 : REM PAINT THE SCREEN 

20 COLOR = C 

30 FORI = 0 TO 39 

40 VLIN 39,0 AT I 

50 NEXT I 

60 END 

Try it. The screen clears rather ponderously, like a 
stage curtain rolling across from left to right. If you 
want the curtain to move from right to left, just 
change line 30 to 

30 FOR I = 39 TO 0 STEP -1 


If you want it to operate on whole-screen graphics, 
line 40 should be altered to 
40 VLIN 47,0 ATI 


This method works fine, if you don’t mind the 
relatively slow speed of the clearing operation. In fact, 
for some special effects it might even be preferred. 
Notice how you can control the direction of motion of 
the apparently rolling curtain. As an ‘‘exercise for the 
student’’, consider how you might change lines 30 and 
40 so as to cause the curtain to appear to be rising up- 
wards. That can be a rather pretty effect, especially if 
you don’t just leave a blank screen but instead ‘‘paint- 
in’’ a scene of some kind to coincide with the rising of 
the curtain (i-e., one horizontal line at a time, from 
bottom to top); it can look like a real stage curtain ris- 
ing to reveal a scene already in place. 

But what if you are not satisfied with the rela- 
tively slow speed with which an Applesoft program 
can clear the screen? If you don’t mind being 
restricted to just a basic black clear, there are some 
dandy machine-language subroutines in the Apple’s 
built-in ROM Monitor which are a lot faster. For 
mixed-screen graphics, try this little program: 

10 GOSUB 1000 : REM PAINT SCREEN 


20 CALL -1994 
30 END 


That’s not only a heck of a lot faster, but pretty sim- 
ple to use, too! If you’re doing full-screen graphics, 
replace line 20 with 

20 CALL -1998 


IN-LINE systems 


TO OUR FAMILY! 


(Formerly SuperScript) 


SuperScribe is the most powerful and easiest to use Word Processor available for your Apple II or Il Plus 
computer. Besides leaping tall buildings in a single bound it: 


* Gives true upper/lower case text on your screen with no ad- » SuperScribe has a built-in instruction capability such that if 
ditional hardware whatsoever. you forget how to use a command and the manual is not close 
by - you may simply ask SuperScribe! 
* Works with documents larger than the amount of memory in j i i 
your Apple - transparently to you! * Supports multiple disk drives! 
¢ Will support alternate character sets. 
it not only lett it also text i ile, or even * ; ; 
: Beate eromeais) els pltvalso.anyitextoribinary file, i * Produces form letters using address files easily! 
° Supports the shift key modification if made to your Apple. 
° Automatically generates up to 4 separate indices for your 


‘document e Lets you work with your text on a screen at a time basis - 


reducing typos and allowing you to see your document as you 
edit it. 
* Save typing time through a unique ability to designate specified 

keys as commonly used words, phrases or even commands! * Works with any printer! 


* Supports the language card or any 16K expansion Ram card 
* Globally search for or replace character strings. to keep more of your document readily available in memory. 


SuperScribe is 100% machine language and requires only a 48K Apple II or I Plus with a disk drive. It may be 
purchased through your local computer store or direct from us by sending $89.95 plus $2.50 to cover shipping 
to: 

ON-LINE SYSTEMS - 36575 Mudge Ranch Road - Coarsegold, CA 93614 - 209-683-6858 C.O.D., Master Charge or Visa accepted 


1S PROUD TO ANNOUNCE A NEW ADDITION 
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Very neat. But this way you have no control over the 
direction of motion of the curtain, nor over the color 
to which the screen is cleared. Perhaps for your par- 
ticular application neither of these restrictions makes 
any difference, in exchange for the very real advan- 
tages in speed and simplicity. 

If you’d like to have your cake and eat it too, this 
can be arranged by POKEing a short machine- 
language subroutine into memory. Then you will be 
able to select your background color and still retain 
the speed advantage of the Monitor subroutine. You 
don’t have to know anything about machine- 
language to do this, although for those who are 
curious I’ll explain how it works in a few minutes. 
For the moment, just try the Applesoft program 
below: 

10 GOSUB 1000 : REM PAINT SCREEN 

20 FOR I = 768 TO 782 : REM POKE M/L SUB 

30 READ J : POKE LJ 

40 NEXT I 

50 COLOR = C: REM YOUR CHOICE OF COLOR 

60 CALL 768 : REM CALL THE SUBROUTINE 

70 END 

200 DATA 160, 39, 132, 45, 160, 39, 169, 0, 32, 40, 248, 
136, 16, 248, 96 

For full-screen graphics, replace the second number 

in the DATA statment (‘‘39’’) by the number ‘‘47’’. 

If you RUN this program you'll see that it 
works just like the Monitor version, except that now 
the screen clears to the selected color, C, instead of 
only to black (C =0). It should perhaps be pointed- 
out that once you have POKEd this subroutine into 
the computer by executing lines 20 through 40, you 
can CALL it any number of times in your program 
without having to POKE it in again. Lines 20 - 40 
only have to appear and be executed once in each 
session at the computer. 


Although quite fast, this screen-clearing opera- 
tion is by no means instantaneous: you can still 
perceive a curtain-like movement across the screen. 
What if that’s not good enough? I recently wrote a 
game program in which I wanted the screen to flash 
suddenly white, to indicate that an enemy torpedo 
had broken through my screens and wiped me out. 
Even the machine-language routines are too slow to 
make a believable explosion flash — an instan- 
taneous white-out. Well, this can in fact be done 
with the help of a somewhat longer machine- 
language subroutine which I will now describe. And 
if you’re not into writing game programs, you might 
still like to be able to clear your screen instan- 
taneously to provide nice sharp transitions from one 
scene to the next. 


The new program looks like this: 


70 FOR PAUSE = 0 TO 2000 : NEXT PAUSE 
80 GOSUB 1000 : REM REPAINT SCREEN 

90 FORI = 800 TO 844 : REM NEW SUB 
100 READ J : POKE I,J 
110 NEXT I 
120 COLOR = C 
130 CALL 800 : REM CALL NEW SUBROUTINE 
140 END 


300 DATA 165, 48, 160, 120, 32, 45, 3, 160, 80, 32, 61, 
3, 96, 136, 153, 0, 4, 153, 128, 4, 153, 0, 5, 153, 128, 5 
310 DATA 208, 241, 96, 136, 153, 0, 6, 153, 128, 6, 153, 0, 
7, 153, 128, 7, 208, 241, 96 
For full-screen graphics, replace the ninth number 
in DATA statement 300 (‘‘80’’) by the number 
120” 

As before, once this new subroutine has been 
POKEd into memory it can be CALLed whenever 
you need it without having to rePOKE it (unless, of 
course, you happen to overwrite it in the 
meanwhile). This subroutine has been deliberately 
placed into different memory locations than the 
previous one, so they can coexist in your computer. 
Furthermore, the Applesoft routines associated with 
these two different methods were written in such a 
way that when both have been typed into your com- 
puter as indicated, they will run consecutively. When 
you type RUN, the screen first fills up with colors, 
pauses for a few seconds, and then is erased by the 
first machine-language subroutine. Then the screen 
fills up with a new random color pattern, pauses, 
and is suddenly cleared by the second subroutine. 
The speed difference between these two subroutines 
is readily apparent in operation. 

Each of the several different screen-clearing 
methods which have been described above has its 
own special properties; they are all useful additions 
to your programming arsenal. 

Now, for those who are interested, let me briefly 
discuss the functioning of the two machine-language 
subroutines. I will assume that the reader is at least 
somewhat familiar with 6502 Assembly Language 
and its standard notation. 

The first subroutine, starting at location 768 
decimal (equivalent to $0300 in hexidecimal) is just a 
very slightly altered version of the Monitor’s routine 
which we used earlier by CALLing -1994. The 
Monitor version clears the screen by drawing vertical 
black lines one after another, exactly as we did it in 
our very first Applesoft program. The difference in 
speed between these routines simply reflects the well- 
known speed advantage of machine-language over 
Basic. Since the Monitor’s version only paints in one 
color — black — it was changed to permit the color 
to be an input variable using the standard Applesoft 
COLOR = C instruction to define which one you 
want. In Assembler notation, this subroutine looks 
like this: 


$0300: AO 27 BKGRND LDY #$27 ; Maximum Y for mixed-sereen 
clear 
0302: 84 2D STY V2 ; Store as line-bottom coordinate 
0304: AO 27 LDY #$27 ; Rightmost X-coord (column) 
0306: A900 CLRSCR LDA #$00 _; Will start clearing at top 
0308: 20 28 F8 JSR VLINE — ; Jump to line-drawing subroutine 
DEY ; Next leftmost X-coord (column) 
BPL CLRSCR ; Loop until done 
RTS ; Done, Return 


For full-screen graphics, the number ‘‘27’’ in loca- 
tion $0301 is replaced by the (hexidecimal) number 
“Op”, 

The alert reader may have noticed that the color 
to be used did not appear anywhere in this 


PROGRESSIVE SOFTWARE 


Presents 


Software and Hardware for your APPLE 


VU #1 


© Accepts data from VISICALC* 

© Relocates data and names 

® Connects data and names 

© Creates an out file that can be loaded into VISICALC* 
Written by: MARC GOLDFARB 
Add $4.95 for Postage and Handling. 


$49.95 


VU #2 


Includes all of the features of VU #1. VU #2 is a utility 
program for VISICALC* that has a built-in execute file 
that operates the program automatically and allows the 
user to do repetitious functions, such as payroll comput- 
ing, etc. Written by: 

MARC GOLDFARB 

Add $4.95 for Postage and Handling. 


$59.95 


VU #3 


Includes the abilities of VU #1 and VU #2 but has addi- 
tional superb features. This program will allow the user to 
enter data into VISICALC* from any program merely by 
inserting data into an array (which is well documented in 
the instructions). Then the program places the array into 
VISICALC*. VU #8 will also transfer data generated from 
VISICALC* into any of the user’s programs via an array 
(as defined in the instructions). Written by: 
MARC GOLDFARB 

Add $4.95 for Postage and Handling. 


$69.95 


Menu Planner — Has many types of dishes, counts calories 
for each entry. Prints out or displays menus with daily 
calorie count. Written by: 


GARY A. FOOTE $19.95 


Shopping List — Creates a list that can be used for food 
shopping or any other group of items. Allows user to 
create and save files of other items Prints out list. Written 
by: 


CHARLES HEARN $19.95 


Apple Menu Cookbook — Index-accessed data storage/ 
retrieval program. Recipes stored, unlimited lines per 
entry. Easy editing. Formulated after NY Times Cook- 
book. Other useful features included. Written by: 


WM. MERLINO, MD $19.95 


Data Organizer — Alphabetize and maintain any data list 
up to 1,000 entries. Searching feature. Written by: 


ED HOWERTON $14.95 


“VISICALC is a trade-mark of Personal Software, Inc. 


®@ Programs accepted for publication. 


@ Highest royalty paid. 


additional item. 


FILES 


Builds Serial Files 

Changes Serial Files to Random Access Files 

Adds to End of Serial Files 

Record Insertion and Deletion Anywhere in Serial File 
Move Individual Records or Blocks of Records within 
Serial Files 


A File manipulator that allows the user to search for a 
string within a file, sort data by blocks, handle many files 
at a time (without exiting the program) and saves exe- 
cuted files. A file can be saved under many names, viewed 
in several modes, and dumped (totally or partially) to a 
printer. 


If you would like to work with files you must own this 
program! Comes with 10-page documentation in a binder. 
Because of the size and weight of this program, postage 
and handling charge is necessary. Written by: 
MARC GOLDFARB FILES-Disk only. $49.95 
Add $4.95 for Postage and Handling. 


Super Sort and Search — A free-form data base package 
which allows the user to define fields per record. As the 
data is loaded in, it is automatically sorted. Can also 
merge together files or allow key sort entries. Will sort 
out in particular field, do a generic search and/or search 
for a specific piece of data. Will allow each particular 
record or records to be printed. Written by: 
MARC GOLDFARB 

Add $4.95 for Postage and Handling. 


$69.95 


Matching Patterns — Choose two colored patterns that are 
exactly the same. Music response on correct patterns. 
Higher degree of accuracy produces longer melody before 
changing to more complex pattern (4 levels). Increases 
awareness of contrast and comparison. Written by: 

JUDY PEGG Disk $19.95 


TO ORDER 
Send Check or Money Order to: 


P. O. Box 273 
Plymouth Meeting, PA 19462 


Pennsylvania residents add 6% sales tax. 


POSTAGE AND HANDLING 
Please add $1.50 for the first item and $1.00 for each 


U.S. and foreign dealer and distributor inquiries invited. 


All programs require 16K memory unless specified. 


215-279-4438 


NIBBLE/NUMBER 8/1980 33 
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subroutine. In fact, the Applesoft statement COLOR 
= C automatically stores the appropriate color con- 
stant in location $30 (decimal 48), where the Monitor 
routine VLINE can get at it. VLINE draws a single 
vertical line of the specified color. 

Now, the flash-clear subroutine beginning at 
location 800 decimal ($0320 hexidecimal) works by 
taking advantage of the ‘‘memory-mapped”’ nature 
of the Apple’s low-resolution screen. Each of the 
1600 screen positions on the mixed screen or the 
1920 screen positions on the whole screen is defined 
by a specific half-byte (four bits, or one ‘‘nybble’’) in 
memory. Since these four bits can represent one of 
sixteen different hex numbers ($0 through F), each 
screen position will have one of sixteen different col- 
ors depending on how the defining nybble has been 
set. The two nybbles in each byte define the color for 
two screen positions in the same column but con- 
secutive rows, that is, two vertically-stacked colored 
squares. To color a given square it is only necessary 
to find its corresponding nybble and set it to the ap- 
propriate value. 

Unfortunately, for some reason the Apple 
designers didn’t arrange the memory locations in any 
simple consecutive fashion to correspond to the 
screen rows in numerical order. It requires a special 
algorithm to find the byte which represents the first 
square of each row; all the rest of the squares in that 


» 0.9.9. 0.0,0.0,0.9.0.0. 0.9.0.0. 4 
Bugs in your Apple? 
DDT 


Disco-Tech’s Disc Drive Timer program 
zaps disc drive problems! 


CORRECT 


stow 300 Fast 
29700 © 2980029900 | 30r00 302.00 303.00 
Wevbieation toctliveilisls 


—|—~ 


Analyze disc drive motor speed on a routine basis with 
an adjustable real-time speedometer. Accurate to one- 
tenth of one r.p.m, out of 300r.p.m. 

Fine-tune disc drive motor speed yourself. All you need 
is DDT, two screwdrivers, and five minutes’ time. 
Engineering Business 
Architecture Utilities 
Surveying 


Diskette & eoaalete manual 


Also available for TRS-80 Model I. 


To order or for more information, 
write or call 


<9 microcomputer 


products 
ec M. a division of 
Morton ae Inc. 
1150 Coddingtown Center 
P.O. Box 11129 * Santa Rosa, CA 95406 
707 /523-1600 


Dealer inaus 


PIAA DAA IIA IIA IAC 


row will be represented by consecutive bytes after 
that. To further complicate matters, the last eight 
bytes in every 128 bytes do not correspond to any 
screen positions at all, but rather are used as 
“*scratchpad’’ memory for whatever devices might be 
in the motherboard slots. 

This last little detail makes the required 
subroutine for clearing the screen much more com- 
plicated than it would otherwise have to be. It is 
necessary to take the byte in location $30, which 
represents the chosen color nybble repeated twice, 
and store it in each byte of screen memory, being 
careful not to disturb those special bytes which are 
possibly being used as scratchpad. The address of the 
first and last effective byte of each row in screen 
memory has to be known in advance in order to per- 
form this operation in the fastest possible time, 
without taking time to compute these addresses dur- 
ing the operation. All this has been done in the 
algorithm represented by the assembly-language 
subroutine below: 


$0320: A530 FLASH LDA COLOR ; Get selected color byte 


0322: AO 78 LDY #878; Prepare to fill 120 bytes 
0324: 20 2D 03 JSR FILLI — ; Fill four sets of 120 bytes cach 
0327: AO 50 LDY #$50 ; Prepare to fill 80 bytes 

0329: 20 3D 03 JSR FILL2 — ; Fill four sets of 80 bytes each 
032C: 60 RTS ; Done. Return. 


; Subroutine FILLI puts the selected color byte into 
; each of four sets of 120 consecutive screen-memory 
; bytes, being careful to avoid the scratchpad bytes at 
; the end of each set. 


032D: 88 FILLI DEY 

032E: 99 00 04 STA $400, Y 

0331: 99 80 05 STA $480, Y 

0337: 99 80 05 STA $500, Y 

033A: DO F1 STA $580, Y 

033C: 60 BNE FILL1 
RTS 


; Subroutine FILL2 puts the selected color byte into each 
; of four sets of 80 consecutive screen-memory bytes. 

; These are the ‘‘short lines’’, leaving out at the end of 

; each one of the four text lines at the bottom of the 

; mixed sercen. 


033D: 88 FILL2 DEY 

033E: 99 00 06 STA $600, Y 
0341: 99 80 06 STA $680, Y 
0344: 99 00 07 STA $700, Y 
0347: 99 80 07 STA $780, Y 
034A: DO F1 BNE FILL2 
034C: 60 RTS 


For full-screen graphics, the ‘‘short lines’’ of the 
subroutine FILL2 become full-length lines as in 
FILL1, which is accomplished simply by changing 
the constant ‘‘$50’’ in location $0328 to a ‘‘$78”’. 
And that’s how we clear the screen in a flash. 
But before I quit, I’d like to leave you with one more 
little idea. If, instead of setting the color byte by an 
Applesoft line of the form COLOR = C, you simply 
POKE into location 48 (decimal) any integer less 
than 256 (decimal), you may get a surprise. Depen- 
ding on what integer you POKE, the screen may 
‘clear’ to a pattern of horizontal stripes! I'll bet that 
some clever reader out there will find some in- 
teresting and unexpected application for it. (oO 
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16K Ram 
Expansion 
Board for the 


Apple Il* 
$195.00 


expands your 48K Apple to 
64K of programmable 
memory 

works with Microsoft Z-80 
card, Visicalc, LISA ver 2.0 
and other software 
eliminates the need for an 
Applesoft* or Integer Basic 
ROM Card 

switch selection of RAM or 


mother board ROM 
language 

e includes installation and use 
manual 

e fully assembled and tested 


Visa and MasterCard accepted 
Shipping and handling will be added unless 
Wm the order is accompanied by a check or 
VISA money order 
N.C. residents add 4% sales tax 


*Apple Il and Applesoft are trademarks of Apple 
Computer, Inc. 


OME) 


INCORPORATED" 


P.O. Box 19144 
Greensboro, NC 27410 
(919) 852-1482 


**Formerly Andromeda Computer Systems 
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Fun With 
Apple and 
Pascal 


Gene A. Mauney 
Greensboro, NC 


While using Kenneth Bowles’ excellent textbook, 
Problem Solving Using PASCAL, to self teach 
Pascal, it occurred to me to write this game program 
and make learning Pascal even more exciting. Since 
completing this writing I have discovered that 
Bowles’ 1980 book, Beginner’s Guide for the 
USDA Pascal System, would have helped and I am 
sure will be helpful with my next Pascal ventures. 

I tried to use as many of the Apple-Pascal 
graphics functions as feasible in order to gain ex- 
perience with these and of course depended on the 
Apple Pascal Reference Manual for this. From 
TURTLEGRAPHICS used are: MOVE, 
MOVETO, TURN, TURNTO, GRAFMODE, 
TEXTMODE, VIEWPORT, FILLSCREEN, 
TURTLEX, TURTLEY, WCHAR, and CHAR- 
TYPE. And from APPLESTUFF the RANDOM, 
PADDLE, BUTTON, and NOTE functions. 

My plan was to use as much as would fit in with 
my study of the beginning lessons in Bowles’ text- 
book along with developing a program for a game 
suggested to me by Peter Hildebrandt, to whom goes 
my appreciation. Also thanks to Bill Stanley for his 
helpfulness. In these beginnings I found that it would 
have been very helpful to have had some real Apple- 
Pascal programs for examples. So my hope is that 
this real program will be helpful for those readers 
who are beginners as I. No claims are made as to the 
most efficient methods for programming and I am 
sure that others will be able to find improvements. I 
will be happy to hear from anyone who has com- 
ments and suggestions. I hope programmers and 
players will enjoy it. 


The Program 

BEGIN(*MAIN*) first draws the Pentagon War 
Games frame using the TURTLE, then proceeds to 
the MOVEPENT PROCEDURE. The program 
switches back and forth between MOVEPENT and 
IFPADDLE. MOVEPENT creates the pentagons 
beginning at a random start point (AX,AY) with 
SIDE = 1, and moving from there in random ways 
increasing by SIDE + 3 (*NOTE6*) each time 

for nine times. Here is a place to change the dif- 
ficulty level for the player if you wish. NINE counts 
the times through to know when nine pentagons 
have been formed and also to know the score 


for adding up totals. IFPADDLE accesses the paddle 
position and moves the gun. At two places ("NOTE 
4*) the TURTLEGRAPHICS procedure, CHAR- 
TYPE(6), is used to turn off the previous position of 
the gun and bullets by XORing the image. CHR(11) 
is the up arrow used for gun and bullet. If BUT- 
TON(0) is pushed so is TRUE, the IFBUTTON 
PROCEDURE produces the four bullets with sound 
each. Hit or miss is determined (*NOTE 5*) by 
using the last value of X, the lower left corner of the 
pentagon and the last value of SIDE along with the 
paddle position. If a hit is made, NINE, SCORE 
and TSCORE are added up, destruction of the pen- 
tagon is shown along with sound (*NOTE 3*), and 
the message shown. The TURTLEX and Y func- 
tions are used (*NOTE 2*) to determine the X,Y 
value of the pentagon corner for the destruction pic- 
ture and 20 lines are used here. The procedure 
FILLSCREEN is used (*NOTE 1*) to erase the last 
pentagon just before the destruction image. Finally, 
after five pentagon attacks, the end message is shown 
along with the total score. 


PROGRAM PENTAWAR; 

USES TURTLEGRAPFHICS, APPLESTUFF; 

VAR SCORE, TSCORE, X,Y, 
NINE,SIDE,PENTA: INTEGER; 


PROCEDURE THEEND; 
BEGIN 
TEXTMODE; WRITELN; WRITELN; 
WRITELN(?* * k FENTAGON WARS 
WRITELN; WRITELN; 
WRITELN(? YOUR TOTAL SCORE IS *,TSCORE); 
WRITELN; WRITELN; WRITELN; 
WRITELN(*DIRECTIONS: °); 
WRITELN(? YOU WILL SEE 5 PENTAGON ATTACKS. 7); 
WRITELN(? YOU WILL GET ONLY 5 SHOTS.”); 
WRITELN(*MAXSCORE IS 45 IF YOU HIT THE’); 
WRITELN(*SMALLEST PENTAGON OF EACH ATTACK.’)3 
WRITELN(? (9,8,7,..0 AS PENTAGONS ATTACK.)?)3 
WRITELN(?USE APPLE GAME PADDLE ©. °); 
WRITELN; WRITELN; WRITELN; 


ek * 7s 


WRITELN(? PRESS RETURN THEN R FOR’) 
WRITELN; 
WRITELN(? A NEW GAME. GOOD LUCK!) ; 
WRITELN 

END; 


PROCEDURE MISS; 
VAR TIME: INTEGER; 
BEGIN 
TEXTMODE; WRITELN; WRITELN; 
WRITELN; WRITELN; WRITELN; 


WRITELN(? YOU MISSED !7); 
WRITELN; 

WRITELN(? ONLY ONE SHOT PER ATTACK.) 
WRITELN(? = BETTER LUCK NEXT TIME.*); 
WRITELN 

WRITELN(? PRESS BUTTON TO CONTINUE.’); 


WRITELN; WRITELN; WRITELN; 

WRITELN; WRITELN; WRITELN; 

FOR TIME:= 1 TO 800 DO 

BEGIN END; (KWAIT BUTTON RELEASEX) 
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REFEAT NINE:= 0 
UNTIL BUTTON(O); 
FOR TIME:= 1 TQ 200 DO 
BEGIN END; 


END; 


(AWAIT AGAIN) 


PROCEDURE HIT; 
VAR HITS,LENGTH, ANGLE, 
TX, TY, PITCH, DUR, TIME: 
BEGIN 
SCORE:= NINE + 1; 
TSCORE:= TSCORE + SCORE; 
VIEWPORT (2, 277,90, 180); 
FILLSCREEN (BLACK) 
VIEWPORT (0,279,0,191)3 
MOVETO(X,Y) 3 TURNTO(90) 5 
LENGTH:=21; ANGLE:=120; 
DUR:=1; PITCH:=40; 
FOR HITS:= 1 TO 20 DO 
BEGIN 
PENCOLOR (WHITE) ; 
MOVE (LENGTH) 5 
TX:=TURTLEX; TY:=TURTLEY; 
PENCOLOR (BLACK) ; 
TURN (180) ; MOVE (LENGTH); 
MOVETO(TX,TY)3 
TURN (ANGLED 5 
LENGTH: =LENGTH-1; 
NOTE (PITCH, DUR) ; 


INTEGER; 


(ANOTE 1%) 


(XNOTE 2%) 


s=PITCH—2; 
(CANOTE 3x) 


END; 

TEXTMODE; 

WRITELN;s WRITELN; WRITELN; WRITELN; 
WRITELN\<* PSR ee Sh U's: 
WRITELN; WRITELN; 

WRITELN(” SCORE IS *,SCORE); 
WRITELN; WRITELN; 

WRITELN(* FRESS BUTTON TO CONTINUE.*); 
WRITELN; WRITELN; 


WRITELN; WRITELN; WRITELN; WRITELN; 

FOR TIME:= 1 TO 800 DO 

BEGIN END; CKWAIT BUTTON RELEASEX) 
REPEAT NINE:= 0 
UNTIL BUTTON (OQ) ; 

FOR TIME:= 1 TO 200 

BEGIN END; 


bo 
(kKWAIT AGAINK) 
END; 


PROCEDURE IFEUTTON; 
VAR PX,BUL, TWO,PITCH, DUR: 
BEGIN 
PXs (PADDLE (0) +19) 3 
MOVETO(PX,20) 5 
FOR PITCH:= 40 TO 50 
BEGIN 
DUR: 
END; 
FOR BUL:= 
BEGIN 
TURNTO(90) 3 
MOVE (20 
FOR TWO 
REGIN 
CHARTYPE (4) 3 
WCHAR (CHR(11)) 5 
TURNTO(180) ; 
MOVE (7) 3 
END; 
END; 
IF (PX 
THEN 
END 
ELSE 
END; 


INTEGER; 


DO 


13; NOTE(PITCH, DUR) ; 


1 70 4 DO (x4 BULLETS*) 


CKTURN UP) 


CKNOTE 4x) 


> X) AND (PX < 
BEGIN HIT; 


(X+SIDE) ) 


(KNOTE Sx) 
BEGIN MISS; 


END; 


Apple Monitor Extender 


APPLE II 16k, cAsseTTE 


This utility program works in complete harmony with the Apple 
monitor to extend your computer's capability and help you use 
the full power of machine language programming. 

Screen display shows memory in HEX, ASCII or BINARY. Move 
data anywhere in memory without regard to direction or overlap- 
ping and read or write any sector on disk. Insertions may be in 
HEX or ASCII so you can easily format high speed text displays 
without conversions. 

Study, modify or disassemble any program, complete with 
labels. Several programs may be combined, and the entire 
disassembled text file stored on disk/tape for later assembly. 

The slow listing feature steps through listings with ease. 

©Copyright 1980 Glenn R. Sogge, All Rights Reserved. 


IMAGE ont 615 Academy Drive 
PRODUCTS” 


Northbrook, IL 60062 
312/564-5060 
Computer House Division 
PROGRAMS FOR COMMODORE AND APPLE 


Legal accounting Demo $15.00 
Legal accounting Program 995.00 
Machine Part Quote Demo 15.00 
Machine Part Quote Program 325.00 
Mailing/phone list 80.00 
Political Mail/phone list 130.00 
Beams, structural 115.00 
Trig/Circle Tangent 110.00 
Spur Gears 35.00 
Bolt Circles 25.00 
Filament Wound TAnks 125.00 
Scrunch 25.00 


PROGRAMS FOR COMMODORE ONLY 


AIP, A/R, Job Cost & Job Est. 370.00 
Inventory 95.00 
Financial 175.00 
Real Estate Listings 265.00 
Check Writer 25.00 
File Editing Tools (FET) 65.00 
Screen Dump/Repeat 35.00 
Docu-Print 20.00 
Scrunch 25.00 
Sof-Bkup 40.00 
Sorter (Mach. Language) 35.00 
Trace-Print 25.00 
Vari-Print 25.00 


ASK FOR CATALOG #80-C2 Dealers Wanted 


Computer House Div. 1407 Clinton Road 
Jackson, Michigan 49202 (517) 782-2132 
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PROCEDURE IFFADDLE; 
VAR TIME: INTEGER; 


REGIN OUR NEW PROGRAM PACKAGE 
PENCOLOR (BLACK) 3 FOR THE APPLE II 
MOVETO( (PADDLE (0) +19) , 20); LOOKS TERRIFIC 
FOR TIME:= 1 TO 8 DO (XTIMEX) 
BEGIN (XADJIUST*) SO DOES THE PRICE 
CHARTYPE (6) ; F 
WCHAR (CHR (11))3 (XNOTE 4) Can 25 quality Apple programs cost a mere 
TURNTO(180) 5 $24.95? 
MOVE (7); 
END; We have a lot to gain by almost losing our shirts. Because 
g Fe we are a new and growing company, we need your business 
Ben TON(O) THEN to build our business 
IFBUTTON: APPLE SACK | Twenty-five Applesoft programs with 
END; everything from hi-res graphics to adventures. Programs 
END; ? include 5 business, 5 utility, 10 games and 5 home 
3 programs 


APPLE SACK II — TV TRIVIA — Hundreds of questions 
about your old favorite TV shows from the 50's and the 60's 


Extra points given for super stumpers. Will tingle your 
memory cells. (Integer Basic) 
pace aae ar APPLE SACK Ill — ADVENTURES — 8 Adventures for 
R 2 FH E, excitement in your life. Travel to far away places, thru space, 
nee: AX, BX,CX,NX,AY,BY: INTEGER; into caves, explore dungeons and fight for your life 
EGIN 
REPEAT EACH PACK IS ONLY $24.95 AND INCLUDES 


PENTA:= PENTA+i; SCORE SHIPPING — GET ALL THREE PACKAGES FOR $49.95. 


93) SIDE?= 13 BY 13 NX:= 15 It's not that our program packages for the Apple are so 
40+RANDOM MOD(200); cheap. It’s just that the other companies are so expensive 


AY:= 166; 
3 RDER YOUR SACK TODAY FROM 
PENCOLOR (BLACK) ; o 
MOVETO(AX, AY) $ (x PENTAGON START) CGE 
> Oo = OX 
Bois NINE > 0 DO (49) PENTAGONS \EACH®) Lake Havasu City, Arizona 86403 
: A (602) 855-3357 
VIEWPORT (1,278,900, 180); 
FILLSCREEN (BLACK) 3 (XCLEAR SCREEN) 
VIEWPORT (0, 279,0,180); 
GRAFMODE; 


RANDOM MOD(4+NX); 
RANDOM MOD (&+NX) 5 
X-C>; BY:=BY+8; NX:=NX+4; 


Xt X-BX; Y:=AY-BY; 
SIDE:= SIDE ‘ (KNOTE 6k) 
NINE:= NINE-1; 
PENCOLOR (BLACK) 3 
MOVETO(A,Y) 3 TURNTO(O) 5 
PENCOLOR (WHITE) A real time high resolution, graphics game with super sound effects. 
FOR EACHUNE:= 1 TO 5 DO Features three different skill levels - Novice-for beginners, 
BEGIN (x5 SIDES) ; weteges Arcade’ liticalty and Expert-where the asteroids are at- 
MOVE (SIDE): tracted to your ship. Has true momentum movements & special 
oa 5 is =, design your own asteroid belt option! (NOTE: previous “Asteroids 
TURN (72) 3 CKPENTAGON ANGLE*) owners - send in your original tape or disk [with $3 postage and 
END; handling] for upgrade to Planetoids. 
IFPADDLE; 
END; 
UNTIL FENTA = 53 (XAT END OF GAMEX) 
THEEND; 
END; Formerly "ASTERO of Atari 
Apple 2 - 32K tape 
041-0015 $14.95 
Apple 2 - 32K disk 
REGIN CAMAINE) 
INITTURTLE; 042-0015 $19.95 
MOVETO(O,0)35 
PENCOLOR (WHITE) ; (XDRAW THE FRAME) ww AUATARLE FROM, 
MOVET ORL 2301s STORE OR SEND TO A.l 
MOVETO (2795191) SEND FOR YOUR FREE CATALOg C= 
MOVETO(O,191)3 
MOVETO(O,0) 3 eo» Q Copyright 1980 BOX 3335 
FENCOLOR (BLACK) ; d te LONGWOOD) FLA 32750 
RANDOMIZE; CA ; ventu (o 
PENTA:= 03 TSCORES= 05 a DION OF SCOTT Aas. INC bee | nd 
i CKWAIT FOR <RTN>#) DEALER INQUIRIES INVITED 
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Flipping 
Your Disk 


M. G. Sieg 


If you own an APPLE DISK I, you can double the 
storage capacity of a single mini-floppy at virtually 
no cost. The only things you need are at least two 
floppies, a hand held hole punch, and a colored pen- 
cil that will show on black. 

The trick is simple, make your single sided flop- 
py into a dual sided ‘“‘flipped’’ floppy. 

First, let’s get acquainted with the anatomy of a 
floppy disk. Externally there is a black jacket with 
several holes cut into it. The inside of the jacket is 
lined with a white fabric which can only be seen by 
prying the jacket apart a bit at the center hole. 
Through the holes, the rust colored disk can be seen. 
The rust color is a coating on a mylar surface en- 
abling the drive to read and record information much 
the same as the tape for your cassette recorder. 

The hole in the center of the jacket is the hub 
hole. This permits the disk drive motor to engage the 
disk and spin it. The long wide slot just below the 
hub hole is called the head access slot. It permits the 
read/write head and the pressure pad to access the 
spinning disk. IMPORTANT: Avoid touching the 
disk surface through this slot. Fingerprints on the 
recording surface in this area can cause I/O errors. 
Just to the right of the hub hole is a small hole 
through which the disk surface can be seen at times 
or, at other times, a hole completely through the 
other side of the jacket appears. This is the timing 
hole. Finally, in the upper right corner (if you con- 
sider the head access slot the bottom) of the jacket, 
there is a rectangular slot. This is the write protect 
notch. When the floppy is inserted into the drive, a 
mechanical switch can slip into this notch signalling 
the drive that it is OK to write on this disk. If the 
notch is not present or is covered with a piece of tape 
the disk is ‘‘write protected’’ thereby preventing the 
APPLE from writing anything on this disk — even 
the initialization information. 

By duplicating this write protect notch at the 
same position on the left side of the jacket, the disk 
can be turned over and the DISK II may write on 
the ‘‘flip’’ side. The APPLE DISK is different than 
most other drives because it ignores the timing hole, 
using the motor and ‘soft’ timing techniques instead. 

If you follow these instructions carefully, a good 
90% of major brand mini-floppies can be turned into 
‘flipped’? floppies. Place two disks in front of you 
face up on a very clean surface. Once again you are 
cautioned not to touch the recording surface through 
the head access slot. Take one of the disks and place 
it flipped over on top of the other, such that the head 


access slots are at the bottom. Align them both exact- 
ly and, with a light colored pencil, make a mark on 
the bottom disk along the inside edge of the flipped 
floppy’s write protect notch. With a standard hole 
puncher, punch a half hole (i.e. no further into the 
jacket than your pencil mark) completely through 
both sides of the jacket at your pencil mark. This 
half hole is now the write protect notch for the flip 
side. The fact that this hole is round is of no conse- 
quence, since the only thing of importance is that the 
mechanical switch inside your drive can drop into a 
notch of some type. 

Test your ‘‘flipped’’ floppy by inserting it into 
the drive (flipped side up naturally) and doing the 
normal INIT procedure. If you get several groans 
from your drive followed by an I/O ERROR, you 
may not have your notch deep enough or you may 
have run into one of the 10% or so disks that have 
flaws in the flipped surface. If you suspect your notch 
may not be deep enough, very carefully cut away a 
little more of the jacket. You must be careful not to 
cut into the disk surface, for that may ruin the disk 
completely. Assuming you have reasonable quality 
disks, the flipped surface having a flaw will be a rare 
problem but has no solution. If you should be 
unlucky enough to have this occur first time out, 
don’t be discouraged; try another disk. 

These flipped floppies may now be used exactly 
as you use all the normal disks in your collection. 


YOUR NEW 
WRITE PROTECT 
NOTCH 


WRITE PROTECT 
NOTCH 


O TIMING 
HOLE 


HEAD 
ACCESS 
SLOT 


This is what your flipped floppy should look like after fol- 
lowing the procedures. 


Editor’s Note: While we've printed this article as a reader service, you 
should be well aware of the risks involved. Disks made for single sided use 
may contain flaws on the reverse side. We can’t vouch for the author’s 

10% figure. In essence, try this at your risk! RCL 
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Designing 
Your Own 
Atari 
Character 
Sets 


Graig Patchett 
Greenwich, CT 


If you want to draw boxes, or design a card game, 
then Atari’s graphics characters are terrific. But what 
if you’re writing an outer-space game or a music 
program? Wouldn’t you prefer a rocket ship or a 
rusical note to a vertical line? This article will ex- 
plain not only how to change Atari’s graphics 
characters to whatever you desire, but also how to 
change any Atari character at all, from letters to 
numbers to punctuation. 


What does a character really look like? 

An Atari character, as you may already know, is 
made up of a bunch of small dots grouped close 
together. A total of 64 dots, arranged in an eight-by- 
eight square, can be used to make one character. An 
Atari ‘‘4’’, for example, really looks like this: 


Here, the squares colored in represent the dots that 
are used. Notice that the outside squares are not 
used. If they were, then the characters would touch 
each other when printed side by side, and would be 
difficult to read. Graphics characters can be made to 
touch, however, since side by side they could be 
made to look like one large, continuous character. 


How does the Atarl know which dots to use 
for each character? 

Somewhere in memory the Atari has a list of which 
dots are used for each character. Before we find out 
where this list is, let’s see how the Atari represents 

each character in the list. 


128 643216 8 4 2 | 


The Atari remembers each character as eight 
numbers, each representing a row of eight dots. 
These rows I have numbered above from 0 to 7. 
Row 0 is always the first number, row 7 the last. 
The Atari changes each row of dots into a number 
from 0 to 255 in the following way. Each dot in the 
row is assigned a multiple of two (fron 1 to 128) as 
its value, as shown above. To get the number for a 
given row, just add up the values of the dots used in 
that row. For example, let’s look at the ‘‘4’’. The 
first number will be 12, since dots 4 and 8 are being 
used in row 1 (4+8=12). The third number will be 
28, since dots 4, 8, and 16 are being used in row 2 
(4 +8 + 16 =28), and so on down to row 7, which 
will be 0, since no dots are being used. Before going 
on, make sure you understand how to get the follow- 
ing eight numbers as representing the number ‘‘4’’: 
0, 12, 28, 60, 108, 126, 12, 0. 

Where does the Atari store the list? 

Since there are a total of 128 Atari characters, not 


counting reverse characters (see Appendix C: 
ATASCII Character Set, in the BASIC Reference 


LE SHHHSTICK 


Finally! The ultimate goal in microcomputer hardware, achieved. 
A joystick with? such remarkable realizm and control that even the thought of other joysticks virtually vanish. 


Le Stick was born from a design used in airforce test programs. Inside are motion detectors which will 
manuever your sights in any direction you want with simple one handed movements. The large red push button 
on top provides a quick and accurate firing mechanism for better response time. 


From star raiders to graphic draw programs — Lé Stick 
eliminates all the frustrations you experience with the 
conventional two handed joysticks or keyboards. 


The joystick of the future. See and test it at 
your Datasoft™ dealer today, or contact 
us for more information. 


Atari Le Stick $39.95 


Inc... 


COMPUTER SOFTWARE 


16606 Schoenborn Street ¢ Sepulveda, California 91343 
(213) 894-9154 


Atari Character Generator ; j Atari Mailing List 


This new program for the Atari Computer enables you to create Business application software for the Atari Computer. A versa- 
high resolution graphics in the text mode. Redefines a character tile disc based system. An efficient micro format equal to those 
set virtually any way you want. Ready for whatever language or used for many large computers. Sorts by Zip Codes, Names, and 
graphics set you can devise — from ancient Japanese to Modern stores special data for your personal use. (Diskette) $24.95. 


Russian. (Diskette) $19.95 / (Cassette) $15.95. 
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Manual), the list will contain 1024 numbers (8 
numbers per character X 128 characters = 1024 
numbers), Look at Appendix D: Atari 400/800 
Memory Map in the BASIC Reference Manual. 
This simply describes what some of the different 
memory locations are used for. We’re interested in 
the first locations, containing the ‘‘Operating System 
ROM.”’ The Operating System is just a program 
that tells the Atari how to do everything it can do in 
the ‘‘Memo Pad’’ mode, simple things such as put- 
ting a character on the screen when a key is pressed, 
etc. ROM means that the program will always be in 
the computer’s memory, even when the computer is 
turned off, and can never be changed by the pro- 
grammer (that’s you). Unfortunately, the first 1024 
locations in the Operating System ROM (locations 
57344 to 58367) contain the list of numbers we are 
interested in. In order to change the characters we 
are going to have to change the list, which ROM 
won’t let us do. There’s an easy way out, however, 
and that’s to move the list to a place where we can 
change it. 


Where do we move the list to? 

We need a place where the list will be safe from us 
accidentally changing it, but where we will be able to 
change it when we want to. Looking at Appendix D 
again, about halfway down the page is a box labeled 
“RAMTOP”’. RAMTOP points to the last location 
in user memory, the memory we have available for 
our use. What if we were to change RAMTOP so 
that it pointed 1024 locations before the end of user 
memory? Then the Atari would think that user 
memory ended at the new RAMTOP and would not 
try to put anything in memory after that location. 
We would still be able to use those locations 
ourselves though. Let’s flip over to Appendix I: 
Memory Locations. If we look up decimal location 
106, we see that it contains the value of RAMTOP. 
So if we change location 106, we can trick the Atari 
into staying away from our list. Before we do that, 
however, let me point out that adding one to the 
value in 106 actually adds 256 to RAMTOP. This is 
because of something called ‘‘paging’’, which is too 
complicated to explain here, and not really important 
for what we’re doing anyway. Just be aware that to 
move RAMTOP back 1024 locations, we need to 
subtract four (4x256 = 1024) from location 106. To 
give us some extra space in case the Atari acciden- 
tally goes a little past RAMTOP, we'll subtract five 
instead. We do this using POKE and PEEK as such 
(finally some programming!): 

10 POKE 106, PEEK (106)-5:GRAPHICS 0 

The reason we use a GRAPHICS 9 right after 
changing RAMTOP is because the Atari normally 
stores screen data in the locations we’ll be using for 
the list (see Designing Your Own Atari Graphics 
Modes in the Sept/Oct issue of COMPUTE). If we 
don’t use a GRAPHICS command to move that list 


to a new location, the screen will do strange things 
when we move the character list into place, which we 
are now ready to do (yay!). 


How do we move the list? 

Moving the list is extremely simple; we just use a 
FOR/NEXT loop and POKE the values from ROM 
into their new locations. We first need to figure out 
the value of the location of the first number in the 
new list as such: 

20 STARTLIST = (PEEK(106) + 1)*256 

Remember, we subtracted an extra one from location 
106 to be safe, so we have to add it back on to deter- 
mine the start of the list. Also don’t forget that we 
have to multiply the value in 106 by 256 because of 
paging. Now let’s move (!): 

30 ? “HOLD ON...’’:FOR MOVEME =0 TO 1023:POKE 
STARTLIST + MOVEME, PEEK(57344 + MOVEME): 
NEXT MOVEME 

All that’s left now is to tell the Atari where the new 
list is. We do this by changing the value in location 
756, which points to the starting location of the 
character set to be used (look at Appendix I). If you 
look at location 756 at this stage (use PRINT 
PEEK(756)), you’ll see that it contains the value 224. 
Again, because of paging, this really means 224 x 
256, or 57344 (surprise!), the starting location of the 
character set in ROM. So we go: 

40 POKE 756,STARTLIST/256 

A few words of warning about location 756. 
Everytime you use the GRAPHICS command, the 
Atari sets the value in location 756 back to 224. That 
means that after each GRAPHICS command, you’ll 
have to execute the equivalent of line 40. No big 
deal, but if you forget... 


Let’s change some characters! 

Before we actually make any changes, let’s look at 
the order the characters are stored in the list. For 
this we’ll need Appendix C again (and you thought 
you’d never use the Appendices!). Unfortunately, 
Atari chose not to store the characters in memory ex- 
actly in the ATASCII order. Almost, but not exactly: 


TYPE ATASCII MEMORY 
ORDER ORDER 

uppercase, 
numbers, 32-95 0-63 
punctuation 
graphics 
characters 0-31 64-95 
lowercase, 
some 96-127 96-127 
graphics 


As you can see, all that Atari did was to move the 
graphics characters between the uppercase and lower- 
case (they did this in order to be able to choose bet- 
ween uppercase and lowercase/graphics in modes one 
and two). In the meantime, they made our job 
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harder for us. In order to determine where a 
character is stored in memory, we have to perform a 
little mathematical wizardry on its ATASCII value. 
In the following ‘‘formulas,’’ keep in mind that each 
character is represented by eight numbers, which is 
why we multiply by eight: 


ATASCIIL MEMORY LOCATION 
VALUE (AV) (of first number) 
32-95 (AV-32)*8 +STARTLIST 
0-31 (AV + 64)*8 +STARTLIST 
96-127 AV*8 +STARTLIST 


Of course, to get the location of the original 
character (in ROM), we would add 57344 instead of 
STARTLIST. 

With these mathematical manipulations in 
mind, let’s try one of the original examples that I 
mentioned. We’ll change one of the graphics 
characters, let’s say <CTRLPT, to a musical note. 
First, let’s design our note: 


128 643216 8 4 2 1 


NO AAWN-O 


This may not look exactly like a note as is, but 
because of the size of the dots, it will look fine when 
printed on the screen, as we shall soon see. I’ll leave 
it up to you to check for yourself that the note 
translates into the following eight numbers: 15, 12, 
12, 124, 252, 252, 120, 0. We now want to replace 
the eight numbers already in memory for 
<CTRLPT with these eight. <CTRLPT has an 
ATASCII value of 20 (see Appendix C), which fits in 
the 0-31 category in the formula chart above. The 
first thing to do, therefore, is to add 64 (20 + 64 =84) 
and multiply by eight (8x84 = 672) to give us a value 
of 672. So to change the <CTRLPT character we 
would have to change the eight numbers in memory 
beginning with location 672 + - STARTLIST. We 
make this change using a FOR/NEXT loop and . 
DATA statements as such: 

50 FOR MOVEME = 0 TO 7:READ VALUE:POKE 672 

+ STARTLIST + MOVEME, VALUE:NEXT MOVEME 

60 DATA 15, 12, 12, 124, 252, 252, 120, 0 

Now, after this has been RUN, whenever we use a 
<CTRLPT, we will have a musical note. Try it! 


— 


ANNOUNCING 
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An Invitation to Programming 


software 


from the 
authors of 


exciting games 
and educational programs 
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teenaders 
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and color graphics. 


> 


available on 
guaranteed-to-load 
cassettes 
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area or, 
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eo 


descriptive materials 


Program Design, Inc. 
Department CA 
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203-661-8799 
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As an informal kind of self-test, make sure you 
understand the following two lines. Try and work out 
which character they will change, and what the new 
character will look like, before you actually RUN 
them (with the rest of the program of course): 

70 FOR MOVEME =0 TO 7:READ VALUE:POKE 776 
+STARTLIST + MOVEME, VALUE:NEXT MOVEME 

80 DATA 0, 0, 60, 102, 102, 102, 63, 0 

As you can see, lines 50 and 70 are very much alike 
except for the initial value added to STARTLIST. 
This should light up a sign in your brain saying 
“SUBROUTINE!” If you have more than one or 
two characters to be redesigned, you should use a 
subroutine to save memory. 


A few detalls and programming hints. 
¢ In graphics modes one and two, to use lower 
case and graphics characters with your new 
character set, POKE 756 with STARLIST /256 
+2. To go back to uppercase, etc., POKE 756 
with STARTLIST/256. 
° If you press the RESET button, the Atari will 
change the value of location 106 and put the 
display list back in place of your character set. 
Under such circumstances it is necessary to run 
the program over again in order to get your 
character set back again. 
¢ If a character is too complicated to put in an 
eight by eight box, then use more than one box 
(and therefore more than one character), and 
combine them in a string. For example, using 
the Atari’s regular graphics characters: 
DIM BOX$(7):BOX$ =‘ (see below) ’’: PRINT BOX$ 


Type BOXS as <CTRL>Q, <CTRLPE, <ESC> 
<CTRL> =, <ESC> <CTRL> +,<CTRL>Z, 


<CTRLPC. 


Bonus: Four Colors In Graphics Mode O! 

It is possible to define a character to be one of three 
different colors (4 = 3 + background). The only 
drawback is that once you have defined the letter 
“A”? to be orange, for example, all ‘‘A’’’s will be 
orange, not just the ones you would like to be. 

How do we define the color of a character? It’s 
really quite simple. Just as in graphics mode eight, a 
dot in an even numbered column will be a different 
color than a dot in an odd numbered column. Two 
dots side-by-side will produce yet another color. This 
is why an Atari ‘‘4’’ (and all other Atari characters) 
and my musical note have vertical lines that are two 
dots wide, compared to the horizontal lines that are 
only one dot wide (or thick if you prefer). If the ver- 
tical lines were only one dot wide, they would be a 
different color than the horizontal ones, unless the 
horizontal lines alternated one dot on and one dot 
off. Confused? Don’t worry, just substitute the 
following variations of the musical note for the data 
in the sample program and see what they look like: 


SOFTWARE 


SWIFTY SOFTWARE , INC. 


HOME MANAGEMENT 
FILEIT by Jerry White. A Database System. Use this no-nons 
tronic cataloguing system to create, add, di 
sort different kinds of custom files. For ev 
Disk Package runs on 24K and up. $29,95 


PROGRAMMING AIDS 

BASIC RENUMBER by Fernando Herrera. Change lines, references 
even variables!! Includes BCD converter and BASIC PROGRAM 
DECODER. $14.95 cassette; $19.95 disk. 


CHALLENGE & FUN 
SPACE CHASE by Fernando Herrera. Conquer the Galaxy... if you 
can escape the deadly chase of the patrol fleet. 4 le 
TIME BOMB by Fernando Herrera. Beat the clock in a Mine Field. 5 
levels — any number of players — scoreboard lists top pla 
MINDTRACE by Lee Jacknow. If you like Simon you will love this 
challenge...a real test for your memory. 
DOTS-N-BOXES by Lee Jacknow. You played it as a kid... 
on a computer 
Buy 1 game for $9.95 cassette; $14.95 disk 
Buy 2 games for $14.95 casset .95 di 
Get all 4 games...$24.95 cassette; $29.95 disk 


EDUCATIONAL 
MY mnt ALPHABET by Fernando Herrera. Before you sen: 
id to school he or she will know all the letters, numb: 
unes, animals...even typing and how to run a 
program! Program allows parents to use built-in drawings or to 
design their own. $29.95 disk only. 

SEND CHECK OR MONEY ORDER TO: 


SWIFTY SOFTWARE, INC. 


P.O. BOX 641 
MELVILLE, N.Y. 11747 


Y. RESIDENTS ADD 7) 


it's better 


rt, Inc. 


Software for the Atarit 


SPELLBOUND 
An extremely versatile, user or” SPELLBOUND $15.00 
ented program for any grade (master program with most 
level. Can be used with existing frequently misspelled words) 
data base. user created data, or BASIC 24K 
additional data cassettes. | SBDATATAPE #1. $5.00 
It features: | (short vowels’ long vowels) 
© Learning level - holds a word | §B DATA TAPE #2... $5.00 
on the screen for you to study. | (short vowels/long vowels 


@ Testlevel—flashes the word on | blends) 
the screen for you to spell SB DATA TAPE “3 __. $5.00 
Grades 2-4 (blends/hard s 


© Comes with a data base of the 

most frequently misspelled if soft c) 

wore | SB DATA TAPE #4... $5.00 
© Create your own data base Grades 2-4 (dipthongs 

Store the words on cassette for / homonyms) 

future use. SB DATA TAPE #5... 85,00 
@ Change the words in the data (silent letters/endings. 

base with one of the additional compound words) 

cassettes that are available. §B DATA TAPE “6. $5.00 

Grades 3.5 (more dipthongs 

» consonants) 


SPELLBOUND DATA TAPES fol | double 


low a phonetic sequence. Tape | SB DATA TAPE *7 $5.00 
#1 begins with short vowel, three Grades 4-6 (compound words 
letter words and progresses to | —_/endings) 
long vowel four leter words. The | 8 pATATAPE #8... $500 
words on each casse Heo raed ataedchueecrwa 
this sequence. All words in this Bea 
series are grouped phonetically 

All Data Tapes Require 


and by grade level whenever pos 
sible. All DATA cassettes contain | The Spellbound Master Prog 


G LH.E.S.LS. 


P.O. Box 14 
Gates City, MI 481 35 


13) 595-4722 


Dealer inquiries 


aii White For ice ryt 
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60 DATA 10,8,8,40,168,168,32,0 


Such characters will, of course, look unusual in 
graphics modes one and two, just as they look 
unusual in the above diagrams. 

You can’t do a lot of experimenting with this 
“‘phenomena’’ to get such effects as multicolored 
characters. Changing the background color will 
change the colors of the columns, and thus the colors 
of the characters. Finally, if you only need one ‘‘A’’, 
or whatever, to be a different color, define it as a 
graphics character. 


Bonus: Upper and Lowercase in Graphics 
Modes | and 2. 

By now, after hopefully running things over in your 
mind, you might even suspect already how to mix 
upper and lowercase in modes one and two. If not, it 
is a painfully simple trick. Since modes one and two 
allow use of lowercase and graphics characters 
together, just redefine the graphics characters to be 
uppercase letters! You can do this by moving the up- 
percase character descriptions from the ROM list to 
your own list like so: 

35 FOR MOVEME = 256 TO 472:POKE STARTLIST + 
MOVEME + 256,PEEK(57344 + MOVEME):NEXT 
MOVEME 

Typing a <CTRLPA will now give us an upper- 
case ‘‘A’’ and so on. Of course, this is not the best 
way to do it, since we no longer have any graphics 
characters. If we know that we will only need certain 
uppercase letters in our program, then it would be 
better to move just those letters, one by one, using 


the tables given earlier in the article. In any case, we 
are now able to mix almost any combination of 
characters we wish in graphics modes one and two. 


And as the sun sets slowly in the west... 

I realize that I have attempted to cover quite a bit of 
information over the course of this article, and most 
likely was not able to explain everything to 
everyone’s satisfaction. If you have any pressing ques- 
tions with regard to what I have covered here, please 
feel free to send them to me at the above address, 
along with any constructive criticism you might also 
have, and I’ll do my best to answer them. Good 
luck, and always remember; the Atari is your slave 
and you its master. 1o} 


MUSIC MAGIC 
FOR ATARI® 


MUSICAL MEDLEYS ® MUSICAL REPEATS 
MUSIC PATCHES @ STRUCTURED BASIC 
You bought the Atari’s Music Composer® and enjoyed the 
first few songs. Then you discovered that the 10-phrase limit 
made it impossible to repeat sections of four-voice works 
without coding them again and again. Then someone asked 
you to play a medley and you found that you had to re-code 
all the songs. A friend gave you a really super song but it 

won't load properly and you can’t see where to patch it 
Now you can do it all with MUSIC MAGIC® a software pro- 
duct from Danville Distributors for the Atari 400 or 800. 
Merge phrases to make a single longer phrase. String songs 
together to create medleys. See-and correct the decimal 
values recorded by the Music Composer® cartridge. Code 
your own music records under BASIC 

MUSIC MAGIC® comes with a complete USER GUIDE 
which clearly shows how to use the programs. The GUIDE 
starts with a structured flow chart, gives detailed, line-by- 
line descriptions of the programs and explains why they 
work. MUSIC MAGIC® is written entirely in Atari BASIC 
You'll find the GUIDE an excellent tutorial on structured 
programming in BASIC. 

MUSIC MAGIC®, complete with User Guide, and a pre- 
coded medley of songs on cassette for only $9.95 plus $1.00 
handling. (CA residents add tax.) 


ORDER FORM: 

Name 

City State. Zip. 
L] VISA MC# 

Expires Signature 


Danville Distributors 
823 La Gonda Way, Danville, CA 94526 415-320-3888 


Atari and Music Composer are trademarks of Atari, Inc 


ak Basic ATARI™ SASeire 


THREE-BASE CALCULATOR - $12.95 


Hexadecimal, Decimal, Octal. Reverse Polish 


Notation. 
AUDIBLE DISASSEMBLER - $9.95 


Op-code generates a tone. Decimal Hexadecimal. 


DECISION MAKER - $8.95 


Aids in evaluation of complex decisions. 


ATARI is a trademark of 
ATARI, INC. 


P.O. BOX 1206 
KENT, WA 98031 


Color 


Computer 
Concepts 
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Atari BASIC 
A Line 
Renumbering Utility 


D. M. Gropper, Newburgh, Indiana 
Most programmers developing a program need to in- 
sert lines of code into what they have already writ- 
ten. The current version of Atari BASIC does not 
have a ‘‘RENUM” or ‘‘RESequence’’ command 
available to the user. The following short program 
was written to give the capability of renumbering 
BASIC language programs. 

Listing 1. 

9000 PRINT ‘“‘RENUM UTILITY ACTIVE” 

9010 ADDR = PEEK(136) + PEEK(137) * 256 

9020 PRINT “INPUT STARTING NUMBER AND” 

9030 PRINT ‘INCREMENT (FORMAT X,Y)” 

9040 INPUT START,INCR 

9050 LNUM = PEEK(ADDR) + PEEK(ADDR + 1) * 256 

9060 NADDR = ADDR + PEEK(ADDR + 2) *256 

9070 IF (LNUM = 32768) OR (LNUM = 9000) 

THEN GOTO 9110 
9080 LOWNUM = INT(START / 256) : 
HINUM = INT(START - (LOWNUM *256)) 

9090 POKE ADDR,HINUM : POKE ADDR + 

1,LOWNUM 

9100 START = START + INCR: ADDR = NADR: 

GOTO 9050 
9110 PRINT ‘‘RENUMBERING ENDED AT 
»*sSTART - INCR 

9120 END 

LINE 9010; The address of any BASIC programs’ 
first line is given by the contents of locations 
136 and 137. 

LINE 9050: The first two bytes, starting at the 
address from line 9010, contain the actual line 
number. 

LINE 9060: The third byte contains the length of 
the line in bytes, so adding this to the address 
given by locations 136, 137 will give the address 
of the next line. 

LINE 9070: Here we are testing for the end of the 
program, L = 32768, or the start of the utility, 
L = 9000 

LINE 9080: The new line number is broken into 
two bytes, 

LINE 9090: And ‘POKEd’ back into the line 
number bytes. 

LINE 9100: Update the line number and address 
and repeat. 

LINE 9110: All done... Let’s get out of here and 
tell the programmer what the last line change 
was. 

Listing 2. 

9010 D = 256:S = 100:I = 10:X = PEEK(136) + 

PEEK(137) * D 


9020 L = PEEK(X) + PEEK(X + 1)*D:N = X + 
PEEK(X + 2): IF (L = 32768) OR(L = 9010) THEN 
END 

9030 HN = INT(S/D): LN = INT(S - (HN * D)): 
POKE X,LN: POKE X + 1,HN:S =S +1: 

X = N: GOTO 9020 


This program occupies 534 bytes. Listing 2 is the 
same thing only compacted down to 289 bytes for 
those of us who get tight on memory space. A point 
to note is that listing 2 assumes starting the line 
renumbering with a line number of 100 and in- 
crementing by 10. 

A not so obvious point is that only the line 
numbers are changed and not the sequence of execu- 
tion. For example: 


Taking 

100 X = 100: ? X 
110 Y = 200: ? ¥ 
120 Z = 300:? Z 


If we now use listing 1 to resequence starting with 
120 and using an increment of -10 (in other words 
decrementing) then the end result is: 


120 X = 100: ? X 
110 Y = 200: ? ¥ 
100 Z = 300:? Z 


The output on the screen on running the 
renumbered program would be: 

100 

200 

300 

, because the locations 136 and 137 still point to the 
first line which is now line number 120. The third 
byte at this address is still the length of the line in 
bytes so the next line to be executed is the now- 
numbered 110, etc. 

For those of you who like to experiment — take 
the above example and renumber starting at number 
1 and use an increment of 2 and then ‘‘LIST’’ the 
result. If you bear in mind the editing capability of 
the Atari then the reason for the ‘‘LISTed”’ result 
becomes obvious. 

One last point — if you do use this utility then 
please remember that you will have to manually 

7° 


change any ‘‘GOSUB” or ‘‘GOTO”’ line references 


ATARI OWNERS 
FREE 


DIRECTORY OF ATARI 
SOFTWARE & HARDWARE 
SOURCES 


JIN 


SWIFTY SOFTWARE, INC. 
Town: 


P.O.BOX 641 Atari 8000 
MELVILLE N.Y. 11747 4000 


K 
K 
Other |= None 
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Atori is @ trademark of Atori.inc. 
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SOFTWARE FOR THE ATARI 800* 
AND THE ATARI 400* 


commanp 


TARI TREK™ 
By Fabio Ehrengruber 


Get ready for an exciting trek through space. Your 
mission is to rid the galaxy of Klingon warships, and to 
accomplish this you must use strategy to guide the star. 
ship Enterprise around stars, through space storms, and 
amidst enemy fire. Sound and color enliven this action: 
packed version of the traditional trek game. Nine levels of 
play allow the player to make the mission as easy or as 
challenging as he wishes. At the highest level you are also 
playing against time. Damage to your ship can be 
fepaired in space at a cost of time and resources if you 
can't make it back to base. TARI TREK gives you a lot of 
trek at a low price. This program is written entirely in 
BASIC and requires at least 24K of user memory. For the 
Atari 800 only. 


Tum? 37 
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FASTGAMMON™ 
By Bob Christiansen 


Play backgammon against a talented computer oppo: 
nent. This is the latest and best version of the most popu- 
backgammon-playing program for personal computers 

FASTGAMMON. Roll your own dice or let the computer roll 
them for you. Adjust the display speed to be fast or slow. 
If you wish you can play a game using the same dice rolls 
as the previous game - a great aid in improving your skills 
at backgammon. Beginners find it easy to learn backgam- 
mon by playing against the computer, and even very 
good players find it a challenge to beat FASTGAMMON. 
The 12-page instruction booklet includes the rules of the 
ame. Written in machine language Requires only 8K of 
RAM and runs on both the Atari 400 and the Atari 800. 


LI 


OHEOME JUST GOT RUM OVER 
AFTER 694 MOVES. .TOUGH L 


HaMT TO TRY IT aGaINcy/4)? 


TANK TRAP 
By Don Ursem 


A rampaging tank tries to run you down. You are a combat 
engineer, building concrete barriers in an effort to con- 
tain the tank, Use either the keyboard or an Atari joystick 
to move your man and build walls. If you trap the tank you 
will be awarded a rank based on the amount of time and 
concrete you used up. But they'll be playing taps for you 
if you get run over. There are four levels of play. Higher 
levels of play introduce slow curing concrete, citizens to 
protect, and the ability of the tank to shoot through any 
wall unless you stay close by. Music, color, and sound ef- 
fects add to the excitement. Written in BASIC with ma- 
chine language subroutines. Requires at least 16K of user 
memory. Runs on the Atari 800 and on an Atari 400 with 
16K RAM 


On cassette only - $19.95 


Cassette - $11.95 Diskette - $14.95 Cassette - $11.95 Diskette - $14.95 


QS FORTH™ By James Albanese. Step into the world of the remarkable FORTH programming language. Writing programs in FORTH is much easier than writing them in as- 
sembly language, yet FORTH programs run almost as fast as machine code and many times faster than BASIC programs. QS FORTH is based on fig-FORTH, the popular model 
from the FORTH Interest Group that has become a standard for microcomputers. QS FORTH is a disk-based system that can be used with up to four disk drives. There are five 
modules included: 


1. The FORTH KERNEL (The standard fig-FORTH model customized to run on the Atari computer). 

2. An EXTENSION to the basic vocabulary that contains some handy additional words. 

3. An EDITOR that allows editing source programs (screens) using Atari type editing. 

4. An 10CB module that makes I/O operations easy to set up. 

5. An ASSEMBLER that allows defining FORTH words as a series of 6502 assembly language instructions. 


Modules 2-5 may not have to be loaded with the user's application program, allowing for some efficiencies in program overhead. Full error statements (not just numerical 
codes) are printed out, including most disk error statements. QS FORTH requires at least 24K of RAM and at least one disk drive. For the Atari 800 only. 


On diskette only - $79.95 
kkk kkk kak 


ASSEMBLER by Gary Shannon. Write your own 6502 machine language programs with this inexpensive in-RAM editor/assembler. Use the editor to create and edit your 
assembler source code. Then use the assembler to translate the source code into machine language instructions and store the code in memory. Simple commands allow you 
to save and load the source code to and from cassette tape. You can also save any part of memory on tape and load it back into RAM at the same or at a different location. The 
assembler handles all 6502 mnemonics plus 12 pseudo-ops that include video and printer control. Commenting is allowed and error checking is performed. A very useful 
feature allows you to view and modify hexadecimal code anywhere in memory. Instructions on how to interface machine language subroutines to your BASIC programs are 
included. ASSEMBLER requires 16K of user memory and runs on both the Atari 800 and the Atari 400. 


On cassette only - $24.95 
kaka Kaa Kee 


6502 DISASSEMBLER by Bob Pierce. This neat 8K BASIC program allows you to disassemble machine code, translating it and listing it in assembly language format on 
the video and on the printer if you have one. 6502 DISASSEMBLER can be used to disassemble the operating system ROM, the BASIC cartridge, and machine language pro- 
grams located anywhere in RAM except where the DISASSEMBLER itself resides. (Most Atari cartridges are protected and cannot be disassembled using this disassembler.) 
Also vor as ancl interpreter, translating machine code into ASCII characters. 6502 DISASSEMBLER requires only 8K of user memory and runs on both the Atari 800 
and the Atari 


Cassette - $11.95 Diskette - $14.95 


WHERE TO GET IT: Call us at (213) 344-6599 for the name of the Quality Software dealer nearest 
you. If necessary you may order directly from us. Mastercard and Visa cardholders may place or- 
ders by telephone. Or mail your check or bankcard number to Quality Software, 6660 Reseda 
Bivd., Suite 105, Reseda, CA91335. California residents add 6% sales tax. SHIPPING CHARGES: 
Within North America orders must include $1.50 for first class shipping and handling. Outside 
North America the charge for airmail shipping and handling is $5.00. Pay in US. currency. 


QUALITY SOFTWARE 


6660 Reseda Bivd., Suite 105, Reseda, CA 91335 
(213) 344-6599 


“Indicates trademarks of Atari, Inc. 
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ATARI 
Memory Dump 
and 
Dissassembler 


Robert W. Baker 

Atoo, New Jersey 

Here’s a handy little utility program for the Atari 
400/800 systems. It lets you examine any area of 
memory, either RAM or ROM, in one of two for- 
mats. You can select whether you want a straight 
memory dump or a dissassembly listing. In both for- 
mats, the memory locations are given as both 
decimal and hexadecimal values. The data can be 
displayed on the television/monitor screen or printed 
on a printer if available. 

When first run, the program takes a minute or 
two to initialize but from then on it is relatively fast. 
The starting address for the dump/dissassembly can 
be entered as either a decimal or hexadecimal 
number. When entering it as a hexadecimal number, 
precede the number by a dollar sign ($). You’re then 
asked if a dissassembly is desired. Answering N for 
no will cause the standard memory dump to be 
displayed. Answering Y for yes will generate the 
dissassembly listing. 

Before the dump/dissassembly is displayed you 
are given the option to have the output printed if 
desired. Answering N for no causes the output to be 
displayed as normal, using the entire display (24 
lines). At the end of each screen you are given the 
option to continue (C), restart (R), or stop (S). Con- 
tinue will display the next screen in sequential order. 
Restarting will return to select the starting address 
and allow specifying dump/dissassembly and printer 
options. When printing the data output, the printer 
will print continuously. Just press any key on the 
Atari keyboard to halt the printer. When the printer 
stops you will see the prompt for continue, restart, or 
stop as mentioned above. 


Memory Dump 

The memory dump simply displays the contents of 
eight bytes of memory on each line displayed or 
printed. The values are given in hexadecimal to con- 
serve display space and to correspond with the 
dissassembly listings. This feature is very useful for 
examining pointers or various values stored in 
memory, that do not happen to be executable 
machine code instructions. You might want to play 
around with looking at how BASIC variables or even 


BASIC lines themselves are stored in memory on the 
Atari. 

For those with 80 column printers (Atari 825, 
etc.) you can change the FOR-NEXT loop count in 
line 600 to get 16 bytes per line to conserve paper. 
Just change line 600 to: 

FOR X = 1 TO 16:V = PEEK(A) 

You might even want to change the heading line in 
line number 302 to print the numbers 0 to 9 plus A 
torF. 


Dissassembly Listing 

This feature is much more powerful and can provide 
a wealth of information. When a dissassembly is re- 

quested, the program displays one 6502 machine in- 

struction per line. It indicates the hexadecimal value 

of one to three bytes of memory that make up the in- 
struction. It also displays the instruction and operand 
in the standard assembly code forms. 

Any unrecognized values are indicated by a 
“*2*"” instead of an instruction mnemonic. You may 
have to try different starting locations to get the 
dissassembly to function properly. If you specify an 
address that happens to be the middle of an instruc- 
tion, it may dissassemble as a different instruction 
and/or cause following instructions to be displayed 
incorrectly. This is always a problem with a 
dissassembly program of this kind. It is extremely 
difficult to ‘‘sync-up’’ with the machine instructions 
whenever there are data bytes between various 
routines, etc. If you should see a high number of 
*?*’s displayed, try another starting address, possibly 
one to two higher or lower than the original address. 
This should correct the situation. 

The dissassembly gives each instruction using 
standard MOS Technology mnemonics and address- 
ing nomenclatures. Operand values and addresses 
are shown in hexadecimal and are prefixed by a 
dollar sign ($) as a reminder. All immediate values 
are preceded by parenthesis and indexed values are 
suffixed by a ‘‘,X”’ or ‘‘,Y’’ as appropriate. Zero 
page addressing is implied by the length of the 
operand being only a single byte. All branch instruc- 
tions show the actual computed target address in the 
dissassembly for added convenience. If required, the 
relative offset is shown in the object code. 

The dissassembly function is extremely useful 
for examining machine language routines such as 
those used within the BASIC cartridge itself, or in 
the operating system ROMs. I’ll let you know if I 
come across anything interesting hidden in the Atari 
system. Before anyone asks — if you’d like a copy on 
cassette tape instead of doing all the typing, send $2 
to cover costs. 

Just a quick note concerning the program 
listings. The heading lines printed by the BASIC 
statements in lines 302 and 305 were actually in 
reverse image to enhance the display. Unfortunately 
this does not show up in the program listings. I have 
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AT-16 16K MEMORY BOARD 
for ATARI 800 


ASSEMBLED & TESTED 
READY TO PLUG IN 
COMPLETELY COMPATABLE 
NO MODIFICATIONS 

ADDS 16K OF 200NS RAM 
ONE YEAR WARRANTY 


GoOGOO OD 


ONLY $119.50 


¥ 32K SPECIAL 


Upgrade your system by 32K and SAVE $39.50 
2 AT-16 16K Memory Boards 


ONLY $199.50 


Ideas and products to extend 
your system inexpensively. 


9514 CHESAPEAKE DR., SAN DIEGO, CA. 92128 (714)278-0630 TWX 910-385-1269 
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tried to use CHR$(xx) functions in the print 
statements for clearing the display, etc. to make 
things easier to read. The Atari printers do not print 


the graphics and/or control characters that can be in- 


cluded in PRINT statements. Actually they can 
cause problems if a program is LISTed with these 
control characters imbedded in PRINT statements. 
The control characters will be decoded and acted 
upon by the printer. 


18 a CSCC EP CSESCCC ESTOS OES OS SSS 
25 REM MEMORY DUMP.DISASSEMBLER 


BY: ROBERT W. BAKER 
15 WINDSOR DR, ATCO NJ 98804 


SEK UL RK 17481 SRK 


8 


NENORY 


9@ PRINT "INITIALIZING ..... e 

108 DIM H¥C 16), A$¢6 >, S806, MBC 1536 & 
118 H$="9123456 7B9ABCDEF" 

128 S$=" 

159 OPEN #1,4,8,"K" 

168 FOR X=1 TO 1531 STEP 6 

17@ READ At 

175 IF AS 2,2.="%" THEN ARC2, 4S" KTR" 
186 N=LEM AS}: IF NXG THEN ASCH+1 =S$ 
185 M§CX.X+5 SAS: NEXT & 

208 PRINT CHRE 12505" NENORY?Y 
DUMP “:? :? 
201 PRINT “ENTER DECIMAL STARTING ADDRES 

S": PRINT 

202 PRINT "OR HEX ADDRESS PRECEDED EY '$ 
‘PRINT 

203 POKE 752.8 

204 INPUT A$: IF A$="" THEN 888 

205 IF ASC1,13="$" THEN 289 

206 FOR X=1 TO LENCAf) 

207 IF ASCX, XX "8" OR ASCX,XID"9" THEN 2 


8 

268 NEXT X:A=INTCUALC A$ 1/8 9X8: GOTO 248 
209 AF@:IF LENCA$%<2 THEN 208 

218 FOR X=2 TO LENCAS: 

211 IF AS(X,X% "8" THEN 280 

212 IF AS$CX,XX="9" THEN ARAKI StUALC ARCS 
28)}:GOTO 220 

215 IF ASCNLXX"A" OR ACK, NOD"F" THEN 2 


08 

218 A=AK1E+ASCCASCN, X-55 

220 NEAT X 

24@ PRINT :PRINT "NANT DISSASSEMEL'’ v“"N 
Basen 

242 GET #1,%:D=0:1F X=78 THEN 245 

244 Dei: IF X€>89 THEN 248 

245 PRINT CHRSC A>) 


250 PRINT :PRINT "MONT PRINTED COPY (iH 
on 


255 P=8:GET #1,.% 
266 IF X=78 THEN OPEN #2,9 


8 

278 IF X<>89 THEN 255 

286 P=1:0PEN #2,5,6,"P" 

a. IF P=@ THEN FRINT CHR#( 12525 :GOTO 30 


295 PRINT CHR#( 1252; "DEPRESS ANY KEY TO 
HALT PRINTER" :PRINT #2 

308 PRINT #2; "LOC-DEC/HEX "3 

302 IF D=@ THEN PRINT #2;"8 1 2 3 4 
5 6 ? ":fnTn za 
3@5 PRINT #2;" OBJECT DISSASSENBLY "“ 
318 PRINT #2 

328 POKE 764,255 

33@ IF P=@ THEN FOR N=1 TO 28 

348 IF A>65535 THEN A=A-65536 

35 AS=STREC A): L=LENC AS * 

368 PRINT #2;S$¢1,6-L>;A$i" "i 


18,"E":GOTO 29 


416 UEPEEKS A: 
411 GOSUB 1880:PRINT #25" "i 
415 ARATL  X=CEXU 41 | AS=NECK, N45) 
420 IF A$C1,19="@" THEN PRINT #2; " 
"jA8C2,4>:GOTO 638 
430 VEPEEKCA?:GOSUB 1608 
432 PRINT #23" "j :A=At1 
4335 IF ARK 1, 1ys"2" THEN 588 
448 PRINT #2; " "FARC2,405" 8G 
445 IF AS(S,5°%>"R" THEN 478 
456 IF U>127 THEN U=t-256 
468 Y=A+\!:GOSUB 308:GOTO 598 
476 IF ASS, 5.="#" THEN PRINT #2; "#$"5 °C 
OSUB 19@9:GOTO 5% 
475 IF AS(6,6.=")" THEN PRINT #25 °C") 
pa PRINT #2; "$"; :GOSUB 1888 
482 IF A$(S.57%=" " THEN 593 
485 IF A$(5,62="¥)" THEN PRINT #23 "7": 
GOTO 638 
498 PRINT #23". "iASCS,63:GOTO 630 
508 V1=U:USPEEKCA):GOSUB 1088: A=At+1 
51@ PRINT #2;"  "iASC2,405" "3 
515 Y=V1+¢ 256%) 
520 IF a$(5,53=">" THEN PRINT #2; "0" :G0 
SUB 900:PRINT #2;">":GOTO 636 
S25 GOSUB 988 
530 IF AS(5,59=" " THEN 590 
540 PRINT #2: "."GASCS,52:GOTO 638 
598 PRINT #2: GOTO 638 
686 FOR X=1 TO 8:U=PEEKCA? 
618 GOSUB 1060:PRINT #23" "i 
620 ARAtL:NEXT X:PRINT #2 
63@ IF P= THEN NEXT N:GOTD 780 
648 IF PEEK(7642=255 THEN 348 
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656 GET #1,X 

708 POKE 752. 1:PRINT 

ee "CONTINUE, RESTART, OR STOP ¢C 
710 GET #1,X:1F ¥=67 THEN 299 

738 IF X=82 THEN 269 

748 IF X<>83 THEN 718 

884 POKE 752,.8:CLOSE #1:CLOSE #2:END 
908 PRINT #2; "$"; 

958 VSINTC¥/256 >:GOSUB 1880 

968 VEY-CUKE56 » 

1886 H=INTCWW16 »:L=U-CH816 » 

1016 PRINT #2;H$CH+1, Ht HEC LHL L419; 
1828 RETURH 
— DATA BBRK. 1ORAK >, Bk, Bk, OX. LDRA, LASL 
9010 DATA GPHP, 10RA#, BASL. Bk, BX, ZORA, 2AS 
9826 DATA 1BPLR, 10RAY },G%,0%,6%, 10RAX, 14 
9938 DATA SCLC, 20RAY’, 8k, BX, OX, ZORA, 2ASL 
9846 DATA 2JSR. 1ANDX 2, @k, Ok, IBIT, LAND, IR 
9858 DATA GPLP. 1AND#, GROL, 8k, =2BIT, 2AND, 2 
9868 DATA 1BMIR, LANDY’ >, 6%, 6X, 8%, LANDX, 1R 
9078 DATA @SEC, 2AND1', Gk, OX, BX, ZANDM, ZROL 
a“ DATA ORT. 1EORX >, 6k, Bk, BX, 1EOR, 1LSR 
9899 DATA GPHA, 1EOR#, OLSR, Bk, 2JMP, 2EOR, 2 
LSR, Ok 

9188 DATA IBUCR, LEORY 3.6%, O%,0%, 1EORX, 1L 


9118 DATA BCLI. 2EORY’, ak, OX, BX. 2EORX, 2LSR 
x, Ok 

9126 DATA BRTS, 1ADC >, GX, OX, 8%, 1ADC, 1ROR 
16k 

913@ DATA SPLA, 1ADCH, BROR, Ok, 2 IF 3. 2ADC, 
9148 DATA 1BUSR, 1ADCY’ >, 6k, 8, BX, LADCA, IR 
9158 DATA @SEI. 2ADCY, Bk, Bk, BX, SADCH, 2ROR 
9168 DATA Gk, 1STAX», Ok, OX, ISTY. 1STA, 1STX 
1 OX 

917@ DATA ODEN, BX, THA, Bk, 2577) 25TA, 25TH 
OX 

9188 DATA 1BCCR, 1STAY’ >, Gk, 8%, 1STVS, ISTAX 
sASTXY, Bk 

9198 DATA STYA, 2STAY, OTXS, Bk, BX. 2STAS, Bk 
1 OX 

9208 DATA 1LDY#, 1LDAX*, ILDX#, 8X, ILDY, 1LD 
A, LDX, Bx 

9218 DATA OTAY, ILDA#, BTAX, BX, SLDY, SLDA, 2 


LDX, Bk 
9226 DATA 1BCSR, ILDAY >. 64, 8%, ILDVX, 1LDAX 


 ILDXY, BX 

9238 DATA BCLU, 2LDAY', BTSX, Bf, 2LDVX, 2LDAX 
7 2LDRY, BX 

9248 DATA 1CPY#, 1CMPX >, 6%, 8%, 1CPY¥, ICMP, 1 
DEC. ax 

9258 DATA BIN, ICMP#, BDEX, 8k, 2CPY. 2CMP, 2 
DEC, @k 

9268 DATA 1BNER. 1CMPY’ >, 8%, Bx, AX, 1CMPX, 1D 
EC, @k 

age DATA 8CLD. 2CNPY, 8k, 6%, OX, 2CMPX, 2DEC 
ee ICPX#, 1SBCH 3, OX, OX, 1CPX, 1SBC, 1 
ae BINS, 1SBC#. BNOP, Gk. SCPX, 25BC,2 
9368 DATA 1BEQR, 1SBCY >, 6%, 6k, BX, ISBCX, 11 
NCX, OX 


9318 DATA BSED, 25801", 6k, Ok, BX. 25BCX, 2INC 
X, Bk 


LOC-DECYHEX @ 1 23 45 6 7 
49992 AG2G: 95 BB ES 94 88 ES EB 92 
41880 ABSS: 98 Fé AZ 66 AD Bi 27 
41088 Ad3B: AB AS BC AB 83 26 TF AS 
41616 AGZS: AI BB AS 91 84 91 SA CE 
410824 ABIG: AI 8B 91 8A C8 AB 03 31 
41832 AB4S: 84 AD GA 85 C9 2B FE BB 
41840 AGB: 20 41 BD 20 72 BD AS Fe 
41648 AGE: FO B83 24 99 BD 20 Sf BD 
41856 AGED: AS CA DO SC Ae FF 3A 28 
41864 AGES: 51 DA AG 5D 85 C2 2a Fe 
41072 ABTO: BA 28 F4 AS 09 EA AS BB 
41889 ABTS: 8 F2 OF 85 94 55 Ab 
41888 ABBB: 85 BZ 85 Ba 35 Bi AG Se 
41896 ABBS: SS AD AS 85 85 AE 28 Al 
41184 AG90: DB 28 OF Al 28 05 AB AS 

XEKKX SAMPLE MEMORY DUMP kek 

LOC-DEC“HEX OBJECT DISSASSEMBL'’ 
49992 ABZ: SS BB STA $88,% 
49994 Ag22: EB TNX 
49995 AGZS: 4 BO STY $08, 
40997 AB25: EB INX 
49998 AGZ6: EB 92 CPX #$92 
41000 AG2S: 98 F6 BCC $020 
41802 ABCA: A2 86 LDX #$86 
41004 ABCC: AB BI LDY #$81 
41006 AGZE: 28 7F AB JSR $AS7F 
41089 AGS1: Ae SC LDX #$8C 
41011 AGS: AB 83 LDY #$83 
41013 AGS: 26 7F As JSR SAGCF 
41816 ABZS: AD BB LDA #$88 
41813 ABSA: AB TAY 
41019 ABB: 91 S4 STA ($04,7 
41821 AGSD: 91 8A STA ($801, Y 
41823 AGSF: C8 INY 
41824 ABO: AD OB LDA #25 
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41826 Abe: 91 SA STA ($684 line. It is dimensioned to a size one less than the 
41028 AG44: C8 INY character width of the output device. In the example, 
41829 AB45: AD BF LDA ##83 for the 38 character wide default screen size, it is 
41031 Abd: 91 SA STA ($887 dimensioned to hold up to 37 characters by setting 
41833 ARIS: AD BA LDA #$0A NC to 37. Line 20 initializes LINE$ to a string of 
41835 ABB: §5 C9 STA #3 spaces. N$ is a string used to temporarily store each 
41037 ABID: 28 FS BS JSR $85F3 data item. It should be big enough to hold the largest 
41048 AGS: 28.41 BD JSR $8041 of your data items. To be on the safe side, its length 
41043 AGSZ: 28 72 BD JSR $B0FE is set equal to that of LINE$. 

41046 ABSE: AS 32 LDA #92 The actual subroutines of interest reside in lines 
41048 ABSS: Fa BF BEG $8850 1000-1070 and lines 2000-2010 respectively. The lat- 
41058 AG5a: 28 99 BD JSR $6029 ter routine, as noted above, simply prints LINE$ 


41053 AGSD: 29°57 BD JSR #2057 
41856 AgSE: AS CA LOA $CA 
41858 AGS2: DB SC BNE #4589 
41860 ABS4: AZ FF LOX #$FF 
41862 ABEE: 94 TAS 
XKXKK SAMPLE DISSASSENELY’ 


Formatted 
Output for 
ATARI Basic 


Joseph J. Wrobel 

Many folks tell me that they must struggle to pro- 
duce nicely formatted output when using ATARI 
Basic due to the lack of the TAB function and the 
PRINT USING command. Struggle no more. When 
used together, the two subroutines presented in this 
article can provide formatted output simply and 
directly in ATARI Basic. Both numerics and strings 
are supported. The type, arrangement and format of 
variables which appear on one output line are con- 
trolled on a line-by-line basis by the main program. 
The number of variables in one output is limited 
only by the character width of the output device. The 
output device can be the TV screen or any type of 
printer, ATARI or otherwise. 

The approach to formatted output used here 
employs two subroutines. The purpose of the first is to 
construct a line for output in a string variable set 
aside for this purpose. Each time the subroutine is 
called, it inserts the data sent to it by the main pro- 
gram at the selected position in the string and in the 
format requested. When all the data to be printed in 
the current line has been positioned, the second 
subroutine is called. This subroutine merely prints 
the output line string on the appropriate device, then 
clears the string (fills it with spaces) to prepare it for 
the next line of data. 

A sample program using the routines is given in 
Listing 1. Line 10 is required to set aside the strings 
to be used in the subroutines. LINE$ is the string 
which will ultimately contain the formatted output 


(line 2000) then fills it with spaces (line 2010) in 
preparation for the next output line. If, instead of the 
screen, a printer is the output device, then the 
PRINT of line 2000 may simply be replaced by an 
LPRINT or a PRINT # command, whichever is ap- 
propriate. 

The routine starting at line 1000 actually does 
the formatting and has two different entry points 
depending on whether the data item is a string or a 
numeric. The case of a string is the simpler of the 
two, so let’s consider it first. To position a string you 
must place the string in variable N$, specify the col- 
umn position (RC) against which it is to be right 
justified, then GOSUB 1060. Three examples of this 
calling sequence are given in lines 100-120. At line 
1060 the program first calculates LC, the leftmost 
character position of the data item. Then, if the 
column boundaries are acceptable, it inserts N$ in 
LINE$ and RETURNs. 

To position a numeric, you must put the data 
item into variable N, specify ND, the number of 
digits to the right of the decimal point you wish 
printed, specify RC as defined above, then GOSUB 
1000. See lines 150-170 for examples of this calling 
sequence. In lines 1000-1010 N is rounded to the ap- 
propriate number of decimals. In 1020 the string N$ 
is defined. If the number is to be printed as an in- 
teger (ND =0), N$ is correct as is and the jump is 
taken to 1060 to insert N$ into LINE$. For non- 
integer formats, the decimal point and any trailing 
zeroes which were dropped in forming the string 
representation of the number must be restored. This 
is done in lines 1030-1050. N§$ is then ready for in- 
sertion into LINE$. 

Output from the sample program as printed on 
an ATARI 820 printer (using LPRINT in 2010) is 
shown in Figure 1. Note that the numbers are 
rounded for presentation with the requested preci- 
sion, that the decimal points of each column neatly 
line up, that all trailing zeroes are present and that 
negative numbers are also accommodated. Also note 
how easy it is to line up the column headings with 
the data by simply specifying the appropriate value 
of RC when printing them (see lines 100 & 150, 110 
& 160, 120 & 170). 

The routines run fairly rapidly, but if you need 
some extra speed, the loop in line 2010 can be 
avoided. To do this, dimension a string, let’s call it 
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MT$, the same length as LINE$ and fill it with 

spaces just once at the start. Then, line 2010 can be 

replaced by 2010 LINE$ = MT$:RETURN 

If you have a slow printer like a teletype, you may 

also gain some speed by stripping the trailing spaces 

from LINE$ before printing it. This can be done by 

replacing line 2000 with the three lines given below. 

2000 FOR I=NC TO 1 STEP -1:IF LINES$(I,)<>*‘ ” 
THEN 2004 

2002 NEXT I 

2004 PRINT LINES$(1,1) 


1 REM && FORMATTED OUTPUT EXAMPLE xx 

2 REM JOE WROBEL, ROCHESTER, HY 

3 REM SUBROUTINE VARIABLES - I.LC.H.NC.N 
O.NZ. RC, LINES, N$ 

18 NC=3?:DIM LINES< HC 3, NSCNC > 

28 GOSUE 2618 

188 NS="X":RC=7:GOSUB 1068 

118 N#="4/32" :RC=17:GOSUB 1868 

128 M$="SINCPISK-8 0": RC=33:GOSUB 1860 
138 GOSUB 202% 

14@ FOR #=@ TO 15 

158 N=A:MD=6:RC=? :GOSUB 1808 

168 H=32:ND=3: RC=t?: GOSUB 1808 
ne SXATMC 18478 3: NDE? ROE 


188 GOSUB 2000:HEXT % 

198 STOP 

1068 I=INT¢ 1@-HO+8 52 

1018 M=INTC T4N+8 531 

1028 M$=STR#CN>:1F MO=@ THEN 1066 

1038 IF M=INTCN) THEN NSCLENC MS 3+1 =". " 
1640 MZ=HO+1+LEM¢ STR INTCH} 2 -LEMC NS 3 
1858 IF N26 THEN FOR I=1 TO H2:NCLENCH 
$9410="8" MEST I 

1068 LC=RC+1-LENS Heo: IF LOX=RC AND RC<=N 
C AND LO?=1 THEN LIMES(LC,RCI=NE 

1978 RETURN 

2066 PRINT LIMES 

2018 FOR I=1 TO NC:LINESC 1,135" ":NEAT 1 
‘RETURN 


32: GOSUB 


& RSE SINC PIAA E 
8 8. 888 6. HepB 
i 6.031 Q. 3826834 
2 6.863 G. 7071866 
3 8.894 B.9238795 

4 6.125 1. Babe 
si) 8.156 8.9238 795 
6 6.153 8. 7H? 1868 
¢ @.219 6. 3326834 
8 6.258 8. BBGeHH 
9 6.281 -6. 3826834 
16 6.313 -8. 7871868 
ii 8.344 -O. 9239795 
2 6.375 -1 banSHEE 
13 6. 406 6. 9238795 
14 6.43 -@. 78? 1B6e 

3 @.469 -8. 3826334 


1} 


Random 
Color 
Switching 
While idle 


R.A. Howell 


Have you ever been involved in a scenario similar to 
the following? This has happened to me several 
times. I get the program listing of a new game 

from a friend or from the pages of a magazine. The 
game sounds really exciting, so I anxiously begin 
typing the program into my Atari 800 computer 
system. Of course, my 10 year old son is busily 
watching over my shoulder because he is also anx- 
ious to try out the new program. When I finally 
finish, we try it. After a few corrections for typing 
mistakes, the game is running and we get deeply 
engrossed in playing it. About the time we have 
mastered the rules and are into the full action and 
excitement of the game, ZAP!!, the Atari 800 goes 
into its random color switching routine on the screen. 
This usually makes the playing field difficult to see 
because the random colors selected by the computer 
are either too dark or are all of similar shades so they 
blend together. The solution is simple for those of us 
who have used the Atari; just hit a key, any key on 
the keyboard and the original program’s colors will 
be restored. Right! Wrong! The problem with this is 
that if I take either hand from the joystick or fire 
button to hit a key, my son gains the advantage in 
the game and vice versa. Have you also found 
yourself in this dilemma? 

The problem occurs because of a hardware 
feature on the Atari computer. When a key has not 
been pressed for a little over 9 minutes, the system 
automatically starts to vary the colors on the screen. 
It will continue to randomly vary the colors on the 
screen until a key on the keyboard is pressed. At that 
point it will return the screen to the correct colors 
and begin the 9 minute time-out sequence again. 
The purpose of this feature is to prevent the image 
on the screen from being permanently burned into 
the phosphor on the cathode ray tube when the com- 
puter is left for a long time without being changed. 
However, many programs (games in particular) do 
not require any key-presses. All inputs come from 
trigger buttons and game paddles or joysticks. When 
running such a program, it is inconvenient to have 
this color switching occur every 9 minutes, so let’s 
look at what triggers this feature and how to prevent 
it from happening. 


86 COMPUTE! 


March, 1981. Issue 10. 


Type the following one line program into your 

Atari computer and run it: 

10 PRINT PEEK(77): GOTO 10 

This program repeatedly displays the contents of 
RAM (Random Access Memory) location 77 on the 
screen. As you can see by watching it run, RAM 
location 77 starts at 0 and increments by 1 every 4 to 
4.5 seconds. Now while this program is still running, 
press any key on the keyboard (except BREAK or 
the 4 special function keys). As soon as you pressed 
the key, notice that location 77 returned to 0 and 
started incrementing all over again. Now let the pro- 
gram run for a while without pressing any keys. 
After approximately 9 minutes, the count will be 
close to 128. As soon as RAM location 77 reaches 
128, you will see that it gets set to 254 and the screen 
colors immediately begin to vary randomly. Now 
with the program still running, press any key again. 
Normal colors are returned to the screen and location 
77 begins all over incrementing from 0. 

Each byte of memory in the Atari consists of 8 
BITS (BInary digiTS - 1’s or 0’s). The lower 7 bits 
of memory location 77 are used to count from 0 to 
127. When the count reaches 127, all of these 7 bits 
are binary 1’s. Adding 1 more causes the 8th (upper- 
most) bit to change from 0 to 1 and this triggers the 
random color switching hardware. At 4 to 4.5 
seconds per increment, it takes about 9 minutes for 
the computer to count from 0 to 127. Any number in 
location 77 from 128 to 255 will cause the upper bit 
to be set to 1 and the random color switching to oc- 
cur. To see this, stop the program from running 
(with the BREAK key) and enter the following: 
POKE 77,217 

When you type this and press RETURN, the 
screen immediately starts switching colors because 
217 is between 128 and 255 and has caused the up- 
per bit of memory location 77 to be set to 1. 

So any BASIC program can be modified to pre- 
vent the random color switching from occurring by 
periodically executing a POKE 77,0 to reset location 
77 to zero and prevent it from reaching 128. Now 
you say, ‘Won’t this stop the computer from doing 
its color switching if I leave it for over 9 minutes 
with that program running and thus defeat the pur- 
pose of this hardware feature?’ The answer is no, not 
if the POKE statement is placed in the program pro- 
perly. When the program is idle, it will probably be 
in a loop waiting for paddle or joystick inputs. Just 
make sure the POKE statement is not put in this 
loop. Place it elsewhere in the program where it will 
be executed frequently. Then, if the computer is left 
idle while the program is running, it will not execute 
the POKE statement and random color switching 
will take place after 9 minutes. When the player 
returns, as soon as the joystick or paddle is moved or 
a trigger button pressed, the idle loop will be ter- 
minated and the POKE statement executed, return- 
ing the screen to normal colors. If the POKE state- 


ment is put in the right place, it can be made to ap- 
pear as if the paddle or joystick acted just like a key- 
press in restoring the screen to normal. 

Now that the function of RAM location 77 has 
been revealed, the random color switching feature of 
the Atari computer can be put back into its proper 
place. It won’t need to be a bother any longer by 
popping up unexpectedly at the wrong moment! 
Happy programming. CS 


ATARI 


software 
*LASER-BALL* 


GAME OF ZAP-OR-BE-ZAPPED! REQ. 8K, 
2 JOYSTICKS. CASSETTE ONLY $5.95!! 
(AZ ADD 5%) SEND CASH, CHECK OR 

MONEY ORDER TO: 


COMPUGRAPHICS 
13850 N. 19th AVENUE, SUITE #220 
PHOENIX, AZ 85023 (602) 863-1047 


Software for 
Personal Computers 


A collection of 10 challenging programs created to provide a unique 
entertainment value — end 2 personal ‘business programs with broad 
functional value. In disk ond or cassette as indicated. 


GAMES © HELICOPTER BATTLE Req. — 16K RAM/Cassette $ 9.95 
— 16K RAM/Disk 14.95 

© HORSE RACING Req. — 16K RAM/Cassette 9.95 

— 16K RAM/Disk 14.95 

© KENO Req. — 8K RAM/Cassette 9.95 

—16K RAM, Disk 14.95 

LIGHTNING BOLTS — Req. — 16K RAM/Cassette 9.95 

ond REACTION — 24K RAM/Disk 14.95 

THE MAD MARBLE Req.— 8K RAM/Cassette 9.95 

—16K RAM/Disk 14.95 

MUSIGAME (2 Games) Req. — 16K RAM/Cassette 9.95 

—24K RAM/Disk 14.95 
Req.— 8K RAM/Cassette 9.95 
— 16K RAM/Disk 14.95 
TAG Req. — 16K RAM/Cassette 9.95 
— 16K RAM/Disk 14.95 
Req. — 8K RAM/Cassette 9.95 
—16K RAM/Disk 14.95 
WAR AT SEA Req. — 16K RAM/Cossette 14.95 
— 24K RAM/Disk 19.95 


SUPERMASTER 
TRACTOR BEAM 


BUSINESS ® CCA Data 
Management System Req. — 48K RAM Disk 99.95 
LETTER WRITER Req. — 24K RAM/Disk 19.95 
Mastercard & VISA Accepted 


DIVISION OF CUSTOM ELECTRONICS, INC. 
SOFTWARE 


238 Exchange St., Chicopee, Massachusetts 01013 
(413) 592-4761 


® Dealer And Distributor Inquiries Invited 
© Closed Mondays — Open Daily ‘Til 5:30 — Fridays ‘Til 8 
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A Small 
Operating 
System: 
0S65D 
The Kernel 


Part 3 of 3 


Tom R. Berger 

School of Math 
University of Minnesota 
Minneapolis, MN 


Concluding 
Remarks 


OS65D is a very small operating system. It is in no 
sense ‘generalized’ to run with a large variety of soft- 
ware or peripherals as, say, Digital Research’s CP/M 
is for the Z80. If software and peripherals other than 
those supplied by OSI are to be used, then the 
operating system must be modified. There are ad- 
vantages and disadvantages to such an operating 
system. Disadvantages result from its inherent inflex- 
ibility and lack of generalized commands. On the 
other hand, because the operating system is so very 
small and easy to understand, for those who choose 
to understand it, it is easy to modify to suit personal 
needs: a definite advantage. 


Let’s look now at some ‘features’ not available 
in OS65D. Essentially all the operating system is in 
memory at all times. This creates minor problems 
with peripherals and INPUT/OUTPUT. For exam- 
ple, the original conception by OSI of I/O leads to a 
sequence of routines exactly filling the I/O space. 


Time has shown that OSI did not make the perfect 
choice for all situations. In particular, the real time 
version of OS65D requires that certain of the I/O 
routines be partially overlaid or omitted to make 
room for expansions of other I/O routines. The miss- 
ing routines are not easily returned except by special 
allocation. A more generalized system would have an 
area of memory for I/O routines (just as OS65D 
does), but this area would not have fixed routines in 
it. I/O routines would be written to run at any loca- 
tion and would be loaded into the special space from 
the disk when they were needed, and where a niche 
was available. After they had served their purpose, 
the space they occupy would become available for 
other routines. This ‘generalized’ approach eases I/O 
problems, but requires much additional coding to 
handle all the loading and space allocation. 

The disk handling routines could not be made 
much more compact. In particular, many user func- 
tions are left out. Thus the user must do a large 
amount of housekeeping not required on larger 
systems. The most glaring deficiency is the file crea- 
tion process. You cannot create a file until you know 
its size. Usually, you cannot know its size until it 
is in memory; but the file creation utility occupies 
the same space as the file. As a result, a scratch file 
must be created in order to temporarily save pro- 
grams while a permanent file of the correct size is 
created. The process becomes even more involved if 
you wish to expand a current file beyond its current 
size. 

If you use BASIC programs which process many 
files, then the error recovery process of OS65D is far 
too simple. If BASIC calls an operating system com- 
mand (say DISK!‘‘blah blah’’) and an error occurs, 
this error is often nonrecoverable. That is, the stack 
is reset and return to BASIC occurs through the 
WARM START. This often means your program 
will bomb if you try to CONTINUE. If you have a 
large amount of information stored in BASIC strings 
and in the process of saving it encounter a disk error, 
then without a great deal of knowledge about the in- 
ternal working of BASIC, your information is lost. 

Most file handling is done with BASIC utilities. 
If you are programming in assembly language, this 
leads to endless shuffling back and forth from BASIC 
to the Assembler and back. 

The operating system lacks an adequate editor. 
Thus the Assembler and BASIC must contain their 
own editors. As a consequence, all input must be ac- 
ceptable to one of these two editors if it is to be pro- 
cessed. In particular, line numbers are needed. A 
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BASIC program can be created to solve this num- 
bering problem, but BASIC may be too slow. Solv- 
ing this new problem leads to further complications 
which would not be necessary with a good operating 
system editor. 

There are certain philosophical advantages to a 
small operating system. OS65D is small enough that 
its entire operation can be understood at once. This 
means hackers can modify and alter the system, not 
just by POKES and patches, but fundamentally, to 
suit their own needs. In my experience, most hobby 
OSI computer owners aspire to or already fall in this 
hacking category. The smallness of the system puts 
the user in direct contact with the most fundamental 
operating system commands and operations. Even 
though it is slightly more involved, this gives the user 
the very maximum of control over the system. 

This article was written using disassemblies of 
OS65D V3.2 (NMHZ) Release November 1979. 
Future articles will cover: (1) the I/O routines; (2) 
the Disk routines; (3) the ROM, and (4) 
miscellaneous bits and pieces. The disassemblies I 
have made are fully annotated (by hand) and are 
available for those who would like to use them. Send 
a stamped, self-addressed postcard to me to deter- 
mine availability. 

Tom Berger 
10670 Hollywood Blvd. 
Coon Rapids, MN 55433 © 


SOFTWARE FOR OSI 


VIDEO GAMES 1. 
Three Games. Head- xe) gal 

Battle is a tank game for two to four. Trap! is an enhanced 
blockade style game. 


VIDEO GAMES 2. $15. 
Three games. Gremlin Hu game for oneto 
three. Gunfight is a duel of mobile artillery. Indy isarace game 
for one or two. 


ADVENTURE: MAROONED IN SPACE ............... $12. 
An adventure that runs in 8K! Save your ship and yourself from 
destruction. 


DUNGEON CHASE oii scjssi:sie:siansassiays sissaieisieiaitie seis ani bien $10. 
A real-time video game where you explore a twenty level 
dungeon. 


BOARD GAMES 4 oo io5.s:c cisco sje sree aa pineia eaitigieis saree $15. 
Two games. Mini-gomoku is a machine language version of 
five stones gomoku. Cubic is a3-D tic-tac-toe game. Both with 
graphics. 


DISASSEMBLER ........--ssececee eee e een eens cee ee $12. 
Use this to look at the ROMs in your machine to see what 
makes BASIC tick. Reconstruct the assembler source code of 
machine language programs to understand how they work. 
Our disassembler outputs unique suffixes which identify the 
addressing mode being used, no other program has this! 


SUPER! BIORHYTHMS : ++» $15. 
A sophisticated biorhythm program with many unique 
features. 


C1 SHORTHAND sien SEDs 

Use only two keys to enter any one of the BASIC commands 
or keywords. Saves much typing when entering 
programs. Written in machine language. 


grams available 


Send for FREE catalog 


AORIO SOFTWARE ASSO. 


147 Main St. Ossining, NY 10562 


A Six-Gun 
Shootout 
Game 

For The 
OSI CIP 


Charles L. Stanford 


The Six Gun Shootout game is a very pleasant and 
fun activity, particularly for the six to twelve or so 
age group. But this article concerns more than just 
the mechanics of writing another BASIC game for 
the C1P. When I originally wrote the program 
almost two years ago, we were reasonably satisfied 
with it. Sure, it was slow. Every time a player moved 
his gunfighter up or down the screen, the graphics 
POKEs took a lot longer than desired. And 
remembering that the ‘‘1’’ key was UP and the ‘‘2”’ 
key was down took a lot away. Those of you who 
have seen my articles on Fast Graphics (COMPUTE 
II Issue 3) and on interfacing the Atari Joystick to 
the C1P (COMPUTE Issue 7) can grasp what hap- 
pened. Making that program work like it should has 
taught us more about the workings of the machine, 
over the past year, than any dozen manuals or ar- 
ticles. 

This article, then, is a summing up of the 
methods we used to speed up both the software and 
the hardware to make BASIC games both more fun 
and much more saleable in the not inconsiderable 
Software marketplace. 


BASIC Program Description 

The game runs much as the early Arcade versions 
did. Each player has his gunfighter, who can shoot 
across the screen. Three Cacti obstruct some of the 
view, and move to a new location after each shot. 
Each player can move up or down, and shoot. Each 
gets 15 shots, and 5 hits wins. 

The BASIC program shown in Listing 1 is fairly 
well annotated with REMs, but a few of the routines 
bear some discussion. The initialization starting at 
Line 5 sets the screen up as though no joysticks were 
available. This was deliberate, and makes the game 
more universally useful. It is a good idea to do this 
on all games, whether for paddles or for joysticks. 
The scoring from Line 200 is handled indirectly 
through the Fast Graphics Machine Language 
subroutine. Thus the POKEs of the ASCII 
characters are to that program rather than to the 


Osi 


A JOURNAL FOR OS! USERS!! 


The Aardvark Journal is a bimonthly tutorial for OSI 
users. It features programs customized for OSI and 


has run articles like these: 

1) Using String Variables. 

2) High Speed Basic On An OSI. 

3) Hooking a Cheap Printer To An OSI. 


4) An OSI Disk Primer. 


5) A Word Processor For Disk Or Tape Machines. 


6) Moving The Disk Directory Off Track 12. 


Four back issues already available! 
$9.00 per year (6 issues) 


Z f 
NEW SUPPORT ROMS FOR BASIC 
IN ROM MACHINES 


C1S — for the C1P only, this ROM adds full 
screen edit functions (insert, delete, change 
characters in a basic line.), Software selectable 
scroll windows, two instant screen clears (scroll 
window only and full screen.), software choice of 
OSI or standard keyboard format, Bell support, 
600 Baud cassette support, and a few other 
features. It plugs in in place of the OSI ROM. 
NOTE: this ROM also supports video conversions 
for 24, 32, 48, or 64 characters per line. All that 
and it sells for a measly $39.95. 

C1E/C2E for C1/C2/C4/C8 Basic in ROM ma- 
chines, 

This ROM adds full screen editing, software 
selectable scroll windows, keyboard correction 
(software selectable), and contains an extended 
machine code monitor. It has breakpoint utilities, 
machine code load and save, block memory move 
and hex dump utilities. A must for the machine 
code programmer replaces OS! support ROM, 
Specify system $59.95 


DISK UTILITIES 


SUPER COPY — Single Disk Copier 

This copy program makes multiple copies, 
copies track zero, and copies all the tracks 
that your memory can hold at one time — 
up to 12 tracks at a pass. It’s almost as fast 
as dual disk copying. — $15.95 

MAXIPROSS (WORD PROCESSOR) — 65D 
polled keyboard only - has global and line edit, 
right and left margin justification, imbedded 
margin commands, choice of single, double or 
triple spacing, file access capabilities and all the 
features of a major word processor — and it's 
only $39.95, 


_é 
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SOFTWARE FOR OSI 


ADVENTURES 
Adventures are interactive fantasies where you give the 
computer plain English commands (ie. take the sword, 
look at the control panel.) as you explore alien cities, 
space ships, ancient pyramids and sunken subs. Average 
playing time is 30 to 40 hours in several sessions. 
There is literally nothing else like them — except 
being there yourself. We have six adventures available. 
ESCAPE FROM MARS — Explore an ancient 
Martian city while you prepare for your escape. 


"P.c. BOARDS 


MEMORY BOARDS!! — for the C1P. — and they 
contain parallel! ports! 

Aardvarks new memory board supports 8K 
of 2114's and has provision for a PIA to give a 
parallel ports! It sells as a bare board for $29.95. 
When assembled, the board plugs into the expan- 
sion connector on the 600 board. Available now! 


PROM BURNER FOR THE C1P — Burns single 
supply 2716's. Bare board — $24.95. 

MOTHER BOARD — Expand your expansion 
connector from one to five connectors or use it 
to adapt our C1P boards to your C4/8P. - $14.95, 


ARCADE AND VIDEO GAMES 


ALIEN INVADERS with machine code moves — 
for fast action. This is our best invaders yet. The 
disk version is so fast that we had to add select- 
able speeds to make it playable. 

Tape - $10.95 — Disk - $12.95 


TIME TREK (8K) — real time Startrek action. 
See your torpedoes move across the screen! Real 
graphics — no more scrolling displays. $9.95 


STARFIGHTER — a real time space war where 
you face cruisers, battleships and fighters using a 
variety of weapons. Your screen contains work- 
ing instrumentation and a real time display of the 
alien ships. $6.95 in black and white - $7.95 in 
color and sound, 


MINOS — A game with amazing 3D graphics. 
You see a maze from the top, the screen blanks, 
and then you are in the maze at ground level, 
finding your way through on foot. Realistic 
enough to cause claustrophobia. — $12.95 


This is only a partial listing of what we have to offer. We now offer over 100 programs, data sheets, ROMS, and boards 
for OSI systems. Our $1.00 catalog lists it all and contains free program listings and programming hints to boot. 


(313) 669-3110 


Osi 


NUCLEAR SUBMARINE — Fast moving 
excitement at the bottom of the sea. 
PYRAMID — Our most advanced and most 
challenging adventure. Takes place in our 
own special ancient pyramid. 

VAMPIRE CASTLE — A day in old Drac’s 
castle. But it’s getting dark outside. 


DEATH SHIP — It’s acruise ship — but it ain't 
the Love Boat and survival is far from certain. 


TREK ADVENTURE — Takes place on a 
familiar starship. Almost as 
good as being there. 


$14.95 each 


SCREEN EDITORS 


These programs all allow the editing of basic 
lines. All assume that you are using the standard 
OSI video display and polled keyboard. 

C1P CURSOR CONTROL — A program that uses 
no RAM normally available to the system. (We 
hid it in unused space on page 2). It provides 
real backspace, insert, delete and replace func- 
tions and an optional instant screen clear. 

$11.95 

2/4 CURSOR. This one uses 366 BYTES of 
RAM to provide a full screen editor. Edit and 
change lines on any part of the screen. (Basic in 
ROM systems only.) 

FOR DISK SYSTEMS — (65D, polled key- 
board and standard video only.) 

SUPERDISK. Contains a basic text editor with 
functions similar to the above programs and also 
contains a renumberer, variable table maker, 
search and new BEXEC® programs. The BEXEC* 
provides a directory, create, delete, and change 
utilities on one track and is worth having by 
itself. - $24.95 on 5’ disk - $26.95 on 8". 


AARDVARK IS NOW AN OSI DEALER! 


Now you can buy from people who can support 
your machine. 


—THIS MONTH’S SPECIALS— 


Superboard I! $279 
C1P Model I 429 
cap 749 


«+. and we'll include a free Text Editor Tape 
with each machine! 


Video Modification Plans and P.C. Boards 
for C1P as low as $4.95 


OsI 


Aardvark Technical Services e 1690 Bolton e Walled Lake, MI 48088 
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screen. One routine, the ‘‘man dead’’ sequence, is 
still done in BASIC POKEs as a delay is called for 
here anyway. 


The Joystick Interface 


As described in the previous article mentioned above, 


the joysticks are interfaced to the keyboard such that 
any position can be directly related to the pressing of 
one or two keys. While the Atari Joysticks have eight 
positions around the center, only two of them are 

used in this game, and the others are ‘‘masked’’ out 


of existance. This is done with the routines beginning 


at Lines 700 and 750. Line 710’s POKE K, 127 ac- 
tivates only Row 7 of the Keyboard. The first state- 
ment of Line 720 ORs away any columns except 5, 
4, and 3, by forcing 1s into the others. Thus only 
keys 3, 4, and 5 are accepted as valid inputs. The 
next two statements of that line mask all but Column 
5, so that a “‘shoot’’? command gets precedence over 
a “‘move’’ command. Finally, the other two keys are 
examined in Lines 725 and 730, and one of the move 
routines is addressed. 

The routine at 750 works the same, except that 
Row 6 is activated, and the other player gets his 
chance. Each player is queried in turn, so one guy 
can’t stand there and fill the other full of holes. The 
joystick works the same way as the keyboard, and is 
certainly a lot easier to use without a lot of practice, 
especially by the younger players. 


Fast Graphics for the Six Gunners 

The machine language graphics is done exactly the 
same way as the Choo Choo Collision demonstration 
program of the other previous article. A standard 
routine, shown in Listing 2, addresses a table of 
graphics symbols. These symbols are tailored for any 
game or other graphics screen display as shown in 
Figure 1. First, the Graphics Reference Manual is 
used to ‘‘draw’’ the characters desired, using a grid 
of sufficient size. Don’t worry about screen location. 
The BASIC program takes care of that, by POKEing 
the table. Just lay out the characters, Determine the 
addresses of each of the elements of each character 
relative to the upper left corner of its grid, and 
couple that with the character code in making up the 
table. Each character should be ended with an #$FE 
(if there are more characters) or an #$FF (for the last 
character, or to end the routine). 


Going Farther 

You can just enter this program as-is, and have 
another nice game for your collection. Or you can 
dig a lot deeper, and quite possibly learn some 
techniques that will improve both your programming 
ability and some of those other games that run a bit 
slow, or get tiresome because the keyboard sequence 
is hard to use and remember. Anyone wishing to 
gain a deeper understanding of either the hardware 
or the software concepts described here should most 
certainly look to the other articles referenced. 


Figure 1. Graphics Development 


Listing 1. Basic Program 


5 FORS=ATOO:PRINT:NEXT 

7 REM-FOR ATARI JYSTKS 

1f PRINT" SIX-GUN DUEL GAME 
15 PRINT:PRINT:PRINT 

28 PRINT°LEFT", RRIGHT" 


PRINT" Upr,." 
5 PRINT:PRINT" 3, gow,” g 
iB PRINT:PRINT" 5 SHOOT," = 


YS PRINT:PRINT:PRINT"You Have 45 SHOTS EACH. 
50 PRINT:PRINT:PRINT"Five wits winsl 
2) PRINT:PRINTEPRINT"HIT SPACEEAR TO START 
B GOSUBID;S 
% Gosusés;t 
iB 2=1: LsBrRegs alee 
POKE532, O: 
B POKEK, 253: IFPEEK(K) 51289 1HENSB 
8 coross 
9B AeUSR() :GOSUB299 
95 GoTo7s; 
108 REM-! Mach GRAPHICS 
118 RESTORE 
115 POKE!1, 34:POKE12,2:POKE254 , 96 :POKE255,2 
io FORP= Biool :READM: 135,211, M2 NE! zi 4 é 
DATAIO#, 3, 169, 32, 133 21141 Bu Waa 2 53.8 
i as 334 aly, 86,2,2 


135 DATA2ZY, 284, 208, 247,234, 23h, ie, $117.2 OB, 
4 DATAIT7, 25 ait Ara 2,208, 1 38, Vee a em! 254, 24d, Ea 224,255 
ibe 209; 228;236,96, 33h, 23%, 234,234, 234 


Wa DATAZUG,B, 177, 25h, 206, 157, 
Beveruar ose NEXT 


59 19 tate iow, 143, 


$e 
1 5, 324, ie6, a 84; 34, 185,65, 


BATAIOS abi 7 Mi (2E a By, 3h; 185,65, 149 
18 DaTazsl, Vis 219) a Baseyate 4, 185; 655 1 “ie 25h 
175 Daracionztd, 1, 12 zeriati3a3t 183,88, 149,86, 181 
 DATAST, 431 AR 5 1 5143 192191984136, 194,143 
185 DATAIOS aban 8: is,08, 13, 49,14 
198 DATA53, 255,255, 255.0, 210" g, spree 
195 DATA, 1,2,3,4,5,057,0 o14, 42,13, 1s 


199, RETURN 
20 REM-SCORE 
218 POKET32,48+L: POKET32» Y8+R 
228 IFL=50RR=' FUE NeeD. 
234 MaINT(SL. Nec Me 1g [FM=OTHENM==16 
iB U=INT(SR, 18 2V=SR~ Us ts IF U=@THENU=-10 
2 POKE 726, 4S+M: POKE 728, HO+N 
8 POKET3Y, NO+U: POKET36, UBev 
7B IF SL=GANOSR=BTHENZIO 
2p RETURN 
298 X=USR(Xx) :GOTO6S 
308 REM-LEFT MAN DEAD 
5 CuCH 169 
18 POKEC+2, 32: POKEC-31 , 32: POKEC-61 , 32: POKEC-62, 32: 
POKEC-95, 32 s POKEC™ 120, 32: POKEC- 127, 32: POKEC-156 
32% POKEC- 1865, 92 
25 POKEC, 143: Zoxccr, 171:POKEC+3, 149 
a POKEC+32, 1g OKEC+33, 161 :POREC+34, 148 
OKEC+6, 1813 POKEC:-37,128 
:POKEC+O4 us 
45 POKECHAE, | NEXT :C=C-169RETURN 
58 REM-RICHT MAN DEAD 
D=D+156 
303 POKED?% , 32: POKED+4 , 32: POKED-28, 32 : POKED-69, 32: POKED-61, 32 
365 POKED-E2, 32 : POKED-~92,, 32 : POKED~ 124, 32: POKED-125, 32 
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72 POKED-155, 32: POKED-156, 32:POKED-157, 32 

43 POKED+3 1392 EPOKED+5, 17h? POKED+6, 12 
POKED+32, 178: POKED+33, 128: :POKED+34, 187:POKE0+35, 187 
85 POKED+36, 1 OKED+37, 161: POKED+38, 187 

58 POKED+79, 1 

ig FORT=2T052:NEXT:D=D-158:RETURN 
(est GOTO 75S 


3 Eee 
pee iPece (= 3 y2ANDCDE (x) « 128THENG=2 :GOTONYS 


yes, TFec0-960RC>D+32THENG=23: GoTObks, 
: G=23:! GesUBYES 


5 GOSUBS29 : GoSUB2B9 : GOTO69S 
40d FORX=c+1¢ATOC+199+6 
465 POKEX, 45 


B NEXT 
4 FORT=$TO209:NEXT 
RETURN 
iG See GITOTES 


23 FORK= 1703 
15, UFOCE CH ANDOSECX)- 6THENG=2:GOTO545, 


323 tex VEDeC= 64ORD>C+E4THENG=23 :GOTO5HS, 
530 G=23:GosuB56g 
5 GOSUBzg3 
B RaR+1:GOTO55S 
23 GOSUB569 

B SR=SR=1 
GOSUBEAS:: Sosuse ee: GoTOb4s 


3 POKEX, 45 


RETURN 
iB REM-LEF TMOVE 
Qa ECS SEAR INENTSO 


pa ifesskat sents 


2 
we peas et eesuagddt POKE6Q9, J: POKE6 GS, M:X=USR(X) : 1FQ=1 THENTAS 
GOTO 

658 REVI GHTMOVE 

Soa Q=T: IFO<53443THENT AA 

676 D=D-32:GOTO69S 
& Ont: 1s LEDDSUBTSTHEN TAB 
$38 ob H=D:GOSUB90@: POKE689 , J: POKEGYS, M: X=USR(X) 
535 IF Q=BTHEN759 
1B REM-LEFT INPUT 
1B POKEK, 127, 
715, Y1=PEEK(K) 
J2B Yi=Y1OR199: Y2=Y1OR2HT: IF Y2=24 7THENN AS 
725, IFY1=239THENGAD 

73 IF Y1=223THEN639 
; 5, GOTOTSS 
1 REM-RIGHT INPUT 
16 


bg POKEK, 191 
21 =PEEK(K) 
1=210R199:Z2=Z10R247: 1FZ2=224 7 THENS OD 
T IEZ1=239THENGS DB 
18 LEZ 16223 THENGD ip 
85 GoTOTES 
gag REM-CACTUS LOCATOR 
818 EEa53414 
829 FORK=1T03 
YJ E+ ecunfzesnNo (ny) 
x 


ee 
owxcosue870, eee 896 


8 

998 Reve CHAR Loc sus 
918 J=INT(H/256) 
928 M=H-J*#256 
930 RETURN 
998 EI 


OK 


BEQ | 
LOA, (1),¥ 
INY 


BOB RETELLE 
2005A WHITTAKER RD 
YPSILANTI, MI.48197 


MEMOREX 
Floppy Discs 


Lowest prices. WE WILL NOT 
BE UNDERSOLD!! Buy any 
quantity 1-1000. Visa, Mastercharge 
accepted. Call free (800)235-4137 
for prices and information. All 
orders sent postage paid. 


PACIFIC EXCHANGES 
100 Foothill Blvd 

San Luis Obispo. CA 

93401. (In Cal call 

(805) 543-1037) 
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Keyprint 
Revisited 


Eric Brandon 

Islington, Ontario 

Canada 

When I first saw KEYPRINT by Charles Brannon 
in the NOV/DEC 1980 issue of COMPUTE! I 
thought my printer problems were over. Not so! As I 
read on, I discovered that KEYPRINT was only for 
the new upgrade ROMs, and I had the old original 
ROMs. Furthermore, I knew no machine or 
assembly language. I could: 

a) Get new ROMs (and give up half my pro- 

gram library). 

b) Learn assembly language and modify 

KEYPRINT for the old PETs. 

c) Give up. 

I chose solution b. I purchased books, 
assemblers, disassembler, and all the paraphenalia 
associated with assembly language programming. 
Here is the result of my efforts: KEYPRINT for old 


hc ica 
1 


a 
F 
A 
i 
A 
i 
1 
4 
E 


uch tao 
Sta ote TP tee 


@ 
a 
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First, type in the hexadecimal (base 16) code 
with your monitor. If you don’t know how to do this, 
consult your (or anyone else’s PET manual. 

Once you have entered it, type: 

M 033A 03CF 

and compare what you see with what is on this page. 
If they don’t correspond exactly, either fill in what 
doesn’t match (remember to hit RETURN at the 
end of each line), or start over. 

When KEYPRINT is in memory correctly, type: 
S 01, KEYPRINT, 033A, 03CF 
to save it on tape. 

An ‘X’ command will get you out of the 
monitor. Type: 

SYS 826 

to initialize KEYPRINT. The cursor should reap- 
pear almost instantly. If it doesn’t, you have made a 
mistake in the first 12 bytes (numbers). LOAD it, 
and check again. 

Hopefully, your cursor came back. If it did, hit 
the ‘ \’ key and your screen should be dumped on 
the printer. If it doesn’t, you have made one of the 
following mistakes: 

a) Typing error. 

SOLUTION: Start again. 

b) Your printer has a secondary address other 
than 4. SOLUTION: POKE 861,SA 
You forgot to initialize. 

SOLUTION: SYS 826 and hit the key 
again. 

You hit the wront key. 

SOLUTION: Hit the key to the right of the 
ampersand. 

You tried this program on something other 
than an old ROM PET. 

SOLUTION: Move on to the next article. 

You can also make KEYPRINT work without 
hitting a key (it doesn’t even have to be initialized) 
with an SYS 852. 

When KEYPRINT is active (hitting ‘ ’ will 
make it work), the PET will neither LOAD nor 
SAVE properly. There are two ways of deactivating 
KEYPRINT: 

a) POKE 537,133:POKE 538,230 

b) Typing LOAD or “SHIFT RUN/STOP, 

pushing PLAY, FAST FORWARD, or RE- 

WIND on the cassette and BREAKing it with 

the stop key. If the cassette motor doesn’t run 

before you BREAK the LOAD, KEYPRINT 
will not be deactivated. 


c 


Y~ 
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KEYPRINT can always be revived with an SYS 

826. 

Finally, memory location 843 contains the 
number representing the key that must be hit to 
dump the screen. To change the key, Type: 

FOR T =1 TO 1E6:PRINT PEEK(515):NEXT T 

You will see a column of 255s going up the screen. 
Hit the key you wish to assign as THE key. The 
255s will change into another number, Remember 
that number. BREAK the loop with the STOP key, 
and POKE 843,n where n is the number you saw 


and JINSAM are trademarks of 
nc. 


jemark of Professional 


“This module 
is much more 
powerful than 
you can 
imagine.” 


Robert Baker, 
February, 81 "KILOBAUD 


With WORDPROPACK, 
JINSAM’s WORDPRO 
interface, you obtain 
the ultimate ‘‘state of 
the art’ business tool. 
And, WORDPROPACK 
is just one of seven ac- 
cessory modules and 
systems available with 
JINSAM Data Manager. 


JINSAM is Commodore 
approved. JINSAM is 
available for all Com- 
modore 32K microcom- 
puters. 


RAS VOPVUIPAO? 


Send only $15 for your 
own 84K 5 program 
demonstration system 
or 


SEE YOUR NEAREST 
COMMODORE DEALER 
FOR A DEMONSTRATION 


JINI MICRO- 
SYSTEMS, INC. 


P.O. Box 274 e Riverdale N.Y. 10463 
PHONE: (212) 796-6200 


——| 


94 COMPUTE! March, 1981. Issue 10. 


when you hit the key. | i al 
I hope you find the program useful. I would like ; | 
to thank Jim Butterfield for sharing some memory ee 
locations with me. If anyone wishes more informa- 
tion on the program, or if anyone wants to trade p 
their programs with me please write to: " 
Eric Brandon 
36 Hartfield Road 
Islington, Ontario, Canada 
M9A 3C9 


>TARTREK. 


PETTERM = tz 


Use your PET as an intelligent terminal. Access timeshare systems 
and networks such as the Source or Telenet. This is an interrupt driven 
system with buffered input/output. Unlike dumb terminals, the PET 
can do other tasks instead of having to wait for incoming data. This 
flexibility allows many advanced features. 


These are complete assembled hardware and software packages. 
All include line editing/resend, auto-repeat, shift lock, output to IEEE 
printer and much more. Delivered on cassette or disk. Also, available 
for Commodore 8010 modem or Livermore Star 488 modem. 


PETTERMI All features above .......- $75.00 


PETTERM II All features of |, plus local text editor 
with down-loading capability . . $90.00 


PETTERM Ill All features of II, plus 80/132 column 
INTELLIGENT scrolling window for viewing formatted 


DATA COMMUNICATIONS outputs wider than 40 columns. 


| all EF Ss 
VISA*_| software for small comeuters 


Rio Grande P.0. Box 6483 
TRoshinalesas 1-512-477-2287 Austin, Texas 


Source mail TCE995 78785 7e712 
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OMNIFILE CBM or TRS-80 $30 

Omnifile is a versatile, in-memory database program with sorting, formatting, and computational features. 
Records can be entered, edited, and processed with a single letter command. Omnifile applications include 
inventory records, mailing lists, sales journals and collection lists. Records can be stored on the Commodre floppy 
disks or on the tape cassette. Omnifile uses approximately 6k of RAM memory. Upto 500 records can be contained 
in memory ina 32k CBM at any time. Multiple files are easily accessed from disk or tape. Items canbe sorted, moved, 
inserted and reformatted. Calculations can be made and totals can be printed. The Omnifile package includes the 
program with sample data, listing and manual, and will operate on the large keyboard Commodore PET or CBM 
computers with at least 16k memory. Also available on diskette for $36. An abbreviated version, Data Logger, 
requiring only 1k of RAM is available on cassette for $15. 


GENERAL LEDGER/PERSONAL LEDGER CBM or TRS-80 $30 

General Ledger is a complete double entry bookkeeping system with provisions for budgeting and keeping 
records of income, deductible and non-deductible expenses, assets and liabilities. Simple interactive features allow 
entering transactions, adding or editing accounts, and printing of a detailed income statement and balance sheets. 
Data can be stored on the Commodore floppy disks or cassette. General Ledger occupies about 6.2k of RAM 
memory, allowing approximately 200 accounts ona 16k machine. Transaction files can be accessed by our Omnifile 
database program for complete analysis, sorting by date, account number, etc. The General Ledger program will 
operate on the new Commodore PET or CBM microcomputer systems and comes with sample data, listing, and 
manual. Also available on diskette for $36. An abbreviated version allowing about 35 accounts ona 1.0 or 2.0 BASIC 
8k PET is available on cassette for $20. 


EXPLORE CBM $15 

Inspired by the computerized fantasy simulation “Adventure,” Explore is a conversational program which operates 
on the Commodore PET with only 8k bytes of memory. Explore contains four adventures in which you operate a 
computerized tank, hunt treasure in a magic cave, explore the mall in Washington D.C., and survive in a haunted 
castle. Explore package includes introduction, five data files, and complete manual. Available from Channel Data 
Systems on cassette for $15. Indication of old or new ROMs is requested. 


CHANNEL DATA BOOK for PET CBM $20 

A complete hardware and software reference service listing descriptions for over 1400 software programs and 
over 200 peripheral devices for PET. Also includes an information sources section, and addresses for Commodore 
Dealers in the USA and Canada, Commodore Vendors, and PET user groups. Designed to organize documentation, 
newsletters, listings, and other user selected information in an attractive 3-ring binder. 


ACCESSORIES 


PORT NOISE COMPLETE Speaker-amplifier for Commodore PET or CBM with connector (M & N pin) all 
ready to plug in—$20. 

IEEE/USER PORT CONNECTOR 24 pin connector. With backshell—$7. Without backshell—$4. 

C-10 TAPE CASSETTES High quality AGFA tape with screw type case. $10/10 or $75/100. 


Cash, Checks, Money Orders, VISA, Mastercharge 
Add $2 shipping for each order—COD-$3.50 
For foreign orders please inquire for pricing 


CHANNEL DATA SYSTEMS 


5960 Mandarin Ave. Goleta,CA 93117 805-964-6695 


% COMPUTE! 


March, 1981. Issue 10. 


Learning 
About 
Garbage 
Collection 


Jim Butterfield 


If you are blessed with Commodore’s newest ROM 
4.0 system, you won’t need to worry about garbage 
collection. But users with Original and Upgrade 
ROMs will run into it, and they will find it 
worthwhile to learn more about how it works. 

Garbage collection is misnamed. It should be 
called garbage disposal or preferably memory 
reclaiming. Whatever you call it, the symptoms are 
highly visible and annoying: a long pause during 
which the computer appears to be dead. 

There are methods to overcome many garbage 
collection delays. First, however, it’s worthwhile 
looking into what causes it and how it behaves. We’ll 
perform a series of experiments to disclose the 
characteristics of garbage collection. 


Part 1: Experiments 

Type in the following program: 

100 DIM A$(255) 

110 FOR J =1 TO 255 

120 A$(J) =A" +B” 

130 NEXT J 

500 REMARK: FORCE COLLECTION WITH FRE(0) 
510 PRINT ‘“‘STARTING”’ 

520 Z = FRE() 

530 PRINT ‘‘FINISHED”’ 

Type RUN. There will be a pause of over five 
seconds between the printing of the words START- 
ING and FINISHED. This is the infamous garbage 
collection pause; while it’s in progress, the 
RUN/STOP key doesn’t work and the computer ap- 
pears to be dead. 

Note that there is in fact no garbage to be col- 
lected: all the strings we have manufactured are still 
live. But the delay is still there. 

Conclusion #1: You can have substantial garbage collec- 
tion delays even when you have little or no garbage. 

Now that the program has run, type GOTO 500. 
Garbage collection will take place again on the same 
strings. It’s just as long as the first time. 


Conclusion #2: You don’t save time on a garbage collec- 
tion even though your strings were collected recently. 


Add the following lines to the above program: 


200 FOR J =1 TO 255 
210 A$) = “AB” 
220 NEXT J 


Type RUN. The words STARTING and FI- 
NISHED print with very little delay between them. 
The garbage collection delay has vanished! 

What has happened here? The string AB in line 
210 is used exactly where it lies in the Basic pro- 
gram; there’s no need to repack it into ‘‘dynamic 
string memory’’. As a result, this type of string 
doesn’t need collection. 

In contrast, the string built in line 120 had to be 
manufactured by concatenation, and thus needed to 
be stored in general memory. 


Conclusion #3: Strings supplied within the program don’t 
contribute to garbage collection delays. This also applies to 
strings supplied within DATA statements. 

If you listed the program as we have run it so far, 
you’ll see that we have created a good deal of gar- 
bage. All of the strings generated by line 120 were 
later thrown away and replaced by the strings in line 
210. Yet there was almost no garbage collection 
delay. 


Conclusion #4: Garbage (abandoned strings) don’t con- 
tribute much to garbage collection delay. Only the strings you 
keep cost you time. 

Now let’s change two lines of our program to in- 
crease the number of strings we are generating. 
Change the following lines: 

100 DIM A$(255), B$(255) 


210 BS(J) = LEFT$(‘‘HELLO”’,4) 
This time, we’re going to manufacture twice as many 
strings. Should we expect the garbage collection time 


to double over our previous five seconds? 
Type RUN and see. 


This time, garbage collection took over twenty 
seconds. 


Conclusion #5: Garbage collection time is proportional to 
the square of the number of dynamic (manufactured) strings. 
Now for the final experiment. Type in the following 
lines: 
Original ROM: 

450 X1 = PEEK(134): X2 = PEEK(135) 

460 Y1 = PEEK(130): ¥2 = PEEK(131) 

470 POKE 134,Y1 : POKE 135,Y2 

600 POKE 134,X1 : POKE 135,X2 
Upgrade ROM: 

450 X1 = PEEK(52) : X2 PEEK(53) 

460 Y1 = PEEK(48): Y2 = PEEK(49) 

470 POKE 52,Y1: POKE 53,Y2 

600 POKE 52,X1: POKE 53,X2 


What will these additions do? Just before garbage 
collection begins, it sets the top-of-Basic memory 


tit 
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FOR THE COMMODORE 32K 
COMPUTER SYSTEM 


e 635 Customers. 2000 Invoices Per Month. 
(2040 Disk) 

e May Be Used As A Stand Alone Program Or 
Interfaced With The CMS Software Systems 
General Ledger. 

e Individual Credit Limits And Finance Charge 
Rates For Each Customer. 

e Uses Standard NEBS 9060 Statement Forms. 

e Allows Immediate Account Status Inquiry. 

e Full Reports Including Customer File With 
Balances, Accounts Over Credit Limit, Accounts 
Over 60 Days, Etc. All Reports In Either Account 
Number Or Customer Name Order. 

e Full Disk Backup And Error Correcting Capability. 
Even From Hardware Or Power Failures. 

e Fully Prompted For Fast, Easy Data Entry Even By 
Inexperienced Operators. 


CMS Software Systems, Inc. 


5115 MENEFEE DRIVE ¢ DALLAS, TX 75227 » (214) 381-0690 
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Skyles Electric Works 


BASIC Programmer’s, Toolkit™, Disk-O-Pro™, Command-O™ 


For PET Owners Who Want More Fun 
And Fewer Errors with Their Programs 


Here are thirty-five commands you'll need, all on dual chips you can install in two 
minutes without tools, on any PET or PET system. 2KB or 4KB of ROM firmware 
on each chip with a collection of machine language programs available from the 
time you turn on your PET to the time you shut it off. No tape to load or to interfere 
with any running programs. 


For PET/CBM 2001-8, -8N, -16N/B, -32N/B, 3016 and 3032 


BASIC Programmers Toolkit™ commands 


AUTO* DELETE*? RENUMBER* HELP*¢ TRACE® 
STEP*¢ OFF** APPEND*? DUMP®¢ FIND: 


BASIC Programmers Disk-O-Pro™ 


CONCAT®? DOPEN®° DCLOSE®®° RECORD®®° HEADER®®° COLLECT®®° 
BACKUP®®° COPY®®° APPEND®° DSAVE®° DLOAD®®? CATALOG® 
RENAME ®° SCRATCH®° DIRECTORY®° INITIALIZE®S MERGE®S EXECUTE®S 
SCROLL*? OUT‘ SET KILL°*¢ EAT*¢ PRINT USING®S SEND®S BEEP®S 


RUN APPEND “INPUT” 
DIVISION BY ZERO ERROR IN 500 PRESS PLAY ON TAPE #1 
READY. oK 


HELP 

500 J = SQR(A"B/@) ‘SEARCHING FOR INPUT 
FOUND INPUT 

READY APPENDING 


READY. 


NOTES: 


ed — a program editing and debugging command 

B80 — a BASIC command also available on Commodore CBM® 8016 and 8032 computers. 

BS — a Skyles Electric Works added value BASIC command. 

BASIC Programmers Toolkit™ is a trademark of Palo Alto IC's. 

BASIC Programmers Disk-O-Pro™, Command-O® are trademarks of Skyles Electric Works. 

PET®, CBM® are trademarks of Commodore Business Machines. 

AVAILABLE: | USA/CANADA: Please contact your local dealer 

England: Calco Software Lakeside House, Kingston Hill, Surrey KT2 7QT 

GERMANY: Unternehmensberatung, Axel Brocker Lennebergestr 4, 6500 Mainz 

Japan: Systems Formulate, 1-8-17 Yaesu Shinmaki-cho Bldg. 11F Chuo-ku, Tokyo JAPAN 103 
Phone or write for information. We'll be delighted to answer any questions 

and to send you the complete information package. 


231 E South Whisman Road 
4 Mountain View, CA 94041 
Skyles Electric Works | roe 3e i756 


March, 1981. Issue 10. COMPUTE! 


99 


Skyles Electric Works 


BASIC Programmer’s, Toolkit™, Disk-O-Pro™, Command-O™ 


For CBM® Owners Who Want More Fun 
And Fewer Errors with Their Programs 


Here are nineteen commands you'll need, on a single chip you can install in two 
minutes without tools, on any CBM or CMB system. 4KB of ROM firmware on 
each chip with a collection of machine language programs available from the time 
you turn on your PET to the time you shut it off. 


For CBM 8016 and 8032; BASIC 4.0 


BASIC Programmers Command-O™ 


AUTO®? DUMP*¢ DELETE®? FIND®? (improved) HELP*¢ KILL°? OFF°¢ 
TRACE®< (improved) RENUMBER®: (improved) INITIALIZE®S MERGE®S MOVE®S 
EXECUTE®® SCROLL®! OUT** SET** SEND®S PRINT USING®S BEEP®S 


100 GOSUB 180 MERGE D1 “BUY NOW*" 580 BA-BA- 1 
TOP ERAT USI. CO ABS SEARCHING FOR BUY NOW? peace 
|ADING 


+o 610 RETURN 
160 IFB<>C THEN 105 READY 620 C$="PROFIT $+, ###.#¢ DAILY” 
180 FOR X=IT09 RENUMBER 100, 10 630 PRINT USING CS, PI 
183 PRINT Y(X):NEXT aADY’ 640 DS="LOSS $#, ##4.## DAILY” 
FIND BS 650 PRINT USING DS, LI 
310 PracT ue 'As, GS, G5+cs+0s RUN 
|="NOW IS THE TIME” a DALY 
RENUMBER 110, 10, 105-184 READY toss $000 DAILY 
READY READY 


<q NOTICE > 


When you order Command-O, we will loan 
you a Toolkit until we deliver Command-O. 


<Q NOTICE D> 


ito GosuB 150 
110 PRINT USING CS, A, BS 


PRICES: 


BASIC Programmers Toolkit™ (chip only) $40.00 
BASIC Programmers Disk-O-Pro® (chip only) $75.00 


BASIC Programmers Command-O® (chip only) $75.00 
Interface boards (needed sometimes) $20.00-$50.00 
Instruction Manual (with redeemable $5.00 coupon) $5.00 


Shipping and handling $2.50 USA/Canada, $10.00 Europe/Asia 
California residents please add 6% or 6-1/2% sales tax as required 
Reserve your Disk-O-Pro, Command-O today 
Toolkit™ immediate delivery, Disk-O-Pro delivery in December, Command-O delivery in January 
VISA, MASTERCHARGE ORDERS CALL (800) 538-3083 (except California residents) 
CALIFORNIA ORDERS PLEASE CALL (408) 257-9140 


231 E South Whisman Road 


1 Mountain View, CA 94041 
Skyles Electric Works | Mountain View 
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pointer lower. After garbage collection completes, it 
restores the pointer to its original value. 

There are the same number of strings as 
previously, so it seems that garbage collection time 
should not be affected, and should stay at twenty 
seconds or so. 

Type RUN. Surprise! Garbage collection time 
drops to zero! 


Conclusion #6: Garbage collection is not performed on 
strings located above the top-of-Basic-memory. 

The strings are not affected — but no garbage collec- 
tion took place up there either, so that unwanted 
strings would not be discarded. 


Part 2: Techniques For Reducing Garbage 
Collection Time 

Case 1: Eliminating concatenation garbage. 
Suppose we’re inputting a string and using con- 
catenation to put it together. Sample coding might 
be: 

800 REMARK: INPUT STRING 

810 A$ =‘‘’’ : rem start with null string 

820 GET BS: IF B$ =‘? GOTO 820 

830 IF B$ = CHR$(13) GOTO 850 

840 A$ = A$ + B$ : GOTO 820 

850 REMARK: A$ CONTAINS OUR INPUT 

The problem here is that this type of concatenation 
lays waste a lot of memory. If our input is HELLO, 
ROBERT, the variable A$ will first be set to H, 
then to HE and so on until the full thirteen 
characters are received. Over seventy locations will 
end up containing abandoned strings; and if our in- 
put string were fifty characters long we’d create over 
a thousand bytes of garbage. This kind of thing can 
trigger automatic garbage collection very quickly. 

A little perspective: if A$ and B$ were our only 
string variables, we'd have nothing to worry about. 
Garbage collection would be almost instantaneous. 
But if we had hundreds of other strings lying about, 
they would all go through the collection process, and 
we'd be in time trouble. 

Solution: Before we enter this string-wasting 
routine, insert (at line 805) coding to move the top- 
of-Basic-memory pointer down. Let the concatena- 
tion program run; when it is finished (line 850), force 
a tiny collection with Z = FRE(0) and then restore 
the top-of-Basic-memory pointer. Refer back to the 
experiments for the technique. 


Case 2: Reading in a batch of new strings from a 
file. 

Suppose we read in a whole flock of strings dealing 
with a customer account and place them in one or 
more arrays. No problem so far: the strings will read 
in neatly from a file and there will be little waste 
space. 
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Now assume that we’ve finished with that 
customer and the program goes back to read in 
material for the next account. Danger! The old 
strings are still there, taking up waste space. As we 
read in new material, we may run short of room, 
and garbage collection will automatically be called 
in. It will collect the new strings and quite a few of 
the old ones that we haven’t discarded yet. Help! 


Solution: Get rid of the old strings as soon as 
they are not needed by setting them to null strings 
(e.g., A$J) =‘"’’). Then, when your strings are at a 
minimum — just before reading in the new batch — 
force a collection with Z = FRE(0). Collection will 
be quick, since there are few live strings left, and the 
new information will read into freshly liberated 
memory. 


Case 3: Shuffling strings around 
There are times when you have a lot of strings in an 
array, and you want to change their order. The most 
usual case is that you want to sort them into some 
kind of order. 

To exchange strings four and seven, you would 
tend to code something like: 
700 X$ = X$(4) 
710 X$(4) = X$(7) 
720 X$(7) = X$ 
Unfortunately, this simple swap leaves three aban- 
doned strings in memory: the old value of X$(4), the 
old value of X$(7), and X$, which will probably not 
be used again. We don’t need to do much of this 
before garbage collection kicks in again. 


Solution: Use a technique called an index ar- 
ray. Instead of changing the strings and causing gar- 
bage, change the index instead. The above coding 
will change to: 

700 1% =1%(4) 

710 1% (4) = 1%(7) 

720 1% (7) =1% 

We must be careful to set up array 1% at the start, 
so that 1% (4) =4, for example. At any time, we can 
call up string number four by referring to 
X$(1%(4)). Here’s a simple example: 

100 REMARK: SIMPLE BUBBLE SORT 

110 DIM N$(20),1% (20) 

120 PRINT “INPUT 20 NAMES:”’ 

130 FOR J =1 TO 20 


140 1%J) =J : rem set up index 

150 INPUT N$(J) : rem get string input 
160 NEXT J 

200 F=0 


210 FOR J=1 TO 19 
220 IF NS§(1% (J)) < = NS(I%(J + 1))GOTO 250 

230 F=1 

240 1% = 1%(J):1%(J) = 1%(J + 1): 1%(J + 1) = 1% 
250 NEXT J 

260 IF F = 1 GOTO 200 

300 FOR J =1 TO 20: PRINT N$(I%(J)) : NEXT J 


You can see that we never move a string, but the 
sort is performed. (o} 
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Micro Computer Industries, 


1520 EAST MULBERRY, SUITE 170 
FT. COLLINS, COLO. 80524 
PHONE 303-221-1955 


CREATE-A-BASE 


This data base management program for CBM or PET 32K 
handles most business data processing chores with one 
program. No computer experience required. Just turn it on 
and go! 


EXTREMELY FLEXIBLE FEATURES 


Create records with up to 24 fields of data of your 
choosing. 

File up to 650 records on each floppy diskette (1800 if you 
own the 8050 Disk Drive). 

Change or add fields at any time. 

Change data disks without dumping operating program. 
Sort or search by any one or two fields. 

Data can be added as $ amounts, with right hand 
justification. 

Perform arithmetic operations on fields with $ amounts 
(4, FA). 

Merge files, change or scratch records, output mailing 
labels. 

Completely interactive with WordPro 3 or 4*, output form 
letters, mailing lists, accounts receivable, invoices, 
statements, inventories, even reports on your favorite 
fishing holes (and have more time to go fishing too). 
Start the new year off right with Create-A-Base. 

You'll pat yourself on the back for months. 
Create-A-Base runs on CBM 8032 or 2001 32K machines 
Available on disk only; list price $200.00. 

For 8032, 4040 or 8050 disk drives (Relative Records) 
$360 

*Word Pro is a registered trademark of Professional 
Software Inc. 


INVENTORY CONTROL 

Disk based for CBM or PET 32K 

Inventory 

Point of Sale 

Accounts Receivable 

Inventory a minimum of 2000 items per diskette (a lot 
more with the 8050 Disk Drive.) 

Complete records of merchandise purchased and sold. 
Update files and supply cost values of stocked items. 
Update cash and credit sales, write invoices, remove sales 
from inventory and keep running total of sales tax. 

Cash sales and credit sales. 

Maintain a complete record of items charged, payments on 
account, print bills, sort files and print out summary 
reports. 


List price is only $200.00. 


WORDCHECK 


WordCheck is the secretary's lifesaver! 

Our newest and already one of our fastest selling 
programs. 

This program interacts with WordPro 3 or 4*. Run your 
letters and documents through WordCheck it checks EVERY 
SINGLE WORD for spelling or typographical errors. 
WordCheck contains a spelling list of most commonly used 
words. Any words that do not match this list will show up 
on your screen. If these flagged words are all right pass 
them by with the pressing of a single key or 
AUTOMATICALLY add them to the spelling list without 
having to retype them. 

WordCheck is ideal for doctors, lawyers and anyone else 
doing technical writing. WordCheck is so simple to learn to 
use your secretary can be working with it in a matter of 
minutes. 

Your worries are over! No more scrambling for the 
dictionary when you have to write ‘‘fluorescent’’, 
“nucleotide” or ‘‘receive’’. WordCheck does the work for 
you quickly, thoroughly and accurately. 

Available for CBM and PET 32K** machines with dual disk 
drives. List price is only $200.00. 

* Word Pro is a registered trademark of Professional 
Software Inc. 

**CBM and PET are registered trademarks of Commodore 
Business Machines. 


PET-TERM 
ONLINE TERMINAL SOFTWARE FOR 
THE 8010 OR TNW MODEM 


Machine language routines for speedy performance. 

All necessary screen and keyboard character conversions. 
Control key and special key functions. 

Terminal to Disk Storage. 

Sequential or Program file transmission capability. 
Return to BASIC at will. 

Operate Half or Full Duplex. 


EXTRAS 

Support programs, such as a 

SEQ FILE READ/EDIT/PRINTER which allows you and your 
customers to read, edit and printout those data files you 
will be receiving from the SOURCE and other such data 
bases. Also provided is a SEQ/PROG DECODER which allows 
decoding of operating programs which have been 
transmitted via the 8010 MODEM. 

This program and complete operating documentation lists 
for only $39.95. 


Ltd... 
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Pet Machine 
Language 
Graphics 


David Malmberg, Fremont, CA 


The PET has great graphics for almost any applica- 
tion, especially games. The only drawbacks I have 
found are that sometimes the graphics are not fast 
enough, or certain special effects (such as reversing 
only a section of the screen) cannot be done easily 
or quickly in a BASIC program without resorting to 
writing special subroutines in machine language. 
After many frustrating attempts to get the graphics to 
do exactly what I wanted in various machine 
language routines, I decided to write a general 
machine language subroutine that could be easily 
called from a BASIC program and would give the 
PET a wide-ranging repertoire of graphics ‘‘tricks.’’ 

Listing 1 is a BASIC program that POKEs this 
general machine language subroutine into the second 
cassette buffer and into the top three pages (a page is 
256 bytes) of memory. This program then resets the 
memoy boundaries to protect the machine code from 
any BASIC programs. This is done automatically 
and is independent of the memory size. The program 
will also determine which of the various ROMs are 
in the PET and modify the machine code according- 
ly. It will work with ‘‘old’’, ‘‘new’’ of ‘‘4.0” 
ROMs. However, it will not work with the new 
80-column PETs. 

Once the subroutine has been loaded, it will 
give your BASIC programs significantly enhanced 
graphics capabilities. Specifically, you will be able to 
define a rectangular area on the screen and 
manipulate that area at machine language speed. 
The rectangle may be as small as a single space or as 
large as the entire screen. The area may be 
manipulated in the following ways: 

Filled with any character 

Reversed 

Flashed on and off (i.e., fast multiple reversing) 
Repositioned elsewhere on the screen 

Moved (animation) in any direction at any speed 
with or without screen wraparound 

Made to grow or shrink in size 


Using The Subroutine 

Your BASIC program would use the subroutine by 
POKEing various values into the subroutine’s 
parameter list and then issuing a SYS(826) com- 
mand. The parameter list and the corresponding 


POKE locations are given below: 
LOCATION DESCRIPTION 
700 Starting row (SR) 
(0 to 24) 
701 Last row (LR) 
(0 to 24) 
702 Starting column (SC) 
(0 to 39) 
703 Last column (LC) 
(0 to 39) 
704 Fill character (FC) 
705 Row move direction (RD) 
0 = Up 
1 = Down or to side 
706 # of rows to move (RM) 
707 Column move direction (CD) 
0 = Left 
1 = Right or even 

708 # of column to move (CM) 

709 # of jiffies delay between iterations (JD) 

710 Wraparound factor (WF) 

0 = Wraparound is OK 
1 = Disappear off screen edge 
2 = Move to edge only 

711 # of iterations before returning to BASIC (IT) 

The letters inside the parentheses are short-hand 
variable names to which I have found it useful to 
assign the values of the POKE locations at the begin- 
ning of the BASIC program using the subroutine. In 
this way I don’t have to remember that Jiffy Delay is 
location 709, rather I can just POKE JD,6 if I want 
a 6 jiffy (i.e., 1/10 second) delay between iterations. 
Using these parameter names also reduces the chance 
of errors, and is faster since BASIC handles variables 
faster than constants. I recommend you adopt the 
use of these parameter variables when using this 
subroutine. 

Listing 2 is a BASIC program that demonstrates 
the full range of capabilities of the graphics 
subroutine. You are urged to key it in, run it and 
then study it to see just how each of the graphic ef- 
fects was obtained. You will find it very informative. 

At this point it is appropriate to describe in 
more detail just how the parameters can be used to 
generate various graphic effects. NOTE: In the 
discussions that follow all of the parameters are 
assumed to be zero unless specifically stated other- 
wise. In fact you will find it convenient to GOSUB 
to a routine to zero all of the parameters before 
beginning any new graphics, e.g., GOSUB 7000 in 
Listing 2. 

Defining The Rectangle 

The rectangular area is defined by the values of the 
parameters in locations 700 to 703. The area is the 
intersection of the defined rows and columns. The 
routine assumes that the ‘“‘first’’ row or column on 
the screen is number zero, not number one. If the 
value of the starting row (starting column) is greater 
than the last row (last column) the routine will 
assume that the rectangle ‘‘wraparound’’ the edge of 
the screen. The rectangle may be the entire screen or 
a single space. 
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If your data and program handling requirements are 
minimal, a mini-disk may be for you. If you want to access 
large amounts of data, program libraries, flexible user- 
defined data formating, and easy to understand documen- 
tation, CONSIDER the PET/BETA-1. 


The PET/BETA-1 is a fast digital tape system incorporating 
the BETA-1 drive, with a flexible user-oriented operating 
system. The double-density drive has high-speed random 
access to over 1 million bytes per digital cassette with a 
transfer rate of 1K/second. 


The PET/BETA-1 operating system extends your BASIC 
with 25 new commands executable from the keyboard or 
from a BASIC program. The new commands add sophis- 
ticated data and programming capabilities easily exceed- 
ing those of the Commodore disk. 


For programs PET/BETA-1 offers program chaining and 
merging with dynamic memory management. Machine 


FORTH interactive high level compiler and 
operating system 5—10 times faster than PET 
BASIC. High level block structured language. 
This is a true fig-FORTH implementation for 16 and 
32K PETs. 


‘PET/CBM SOFTWARE ~ 


THE FLOPPY DISK 
ALTERNATIVE 
PET/BETA-1 


language files can be directly linked to user-defined 
commands, and any memory segment can be saved and 
relocated to any RAM location. 


PET/BETA-1 offers sophisticated data management with 
userdefined record and field formats, up to 26 named 
fields per record, with true random access to any record in 
the file. These functions are available with easy to use 
commands. 


With the PET/BETA-1 you control huge amounts of data 
with no operator intervention. The operating system 
supports up to 4 BETA-1 drives. 


This is acomplete hardware/software package, assembled 
and complete with all connectors and extensive user- 
oriented documentation. We provide technical assistance 
by phone and mail. 


PET/BETA-1 System 
Single density (512 k/drive) ........... $555.00 
.... $700.00 


$10.00 


Double density (1 meg/drive) . 


MANUAL (applicable to purchase) 


TERMINAL turn your PET into an intelligent 
terminal with one of our terminal packages. 
These are complete assembled hardware and 
software packages. All include line edit- 
ing/resend, repeat key, shift lock, output to CBM 
printer, and more. Delivered on PET cassette 
with manuals. Inquire for modem prices. 


Software for small computers 


1903 Rio Grande, Austin, Texas 78705 
P.O.B. 8403, Austin, Texas 78712 


1-512-477-2207 


fig-FORTH, with editor, assembler ........... $50.00 
with floating point and strings .............-. $60.00 
with floating point, strings, macro-assembler .. $70.00 
cassette and disk interface available. 

PETTERM | All features above ........ $ 80.00 
PETTERM II All features of |, plus local 

text editor with down-loading capability... 90.00 
PETTERM III All features of II, plus 

80/132 column scrolling window for 

viewing formatted outputs wider than 

40; COMMS: «,. tac tesco.2s aera 100.00 


we) VISA 
) 
FSS in an authorized MECA Inc. dealer. 
Texas residents add 5% sales tax. 


PET is a registered trademark of Commodore. Inc 
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Filling The Area 

If you wish to fill the rectangular area with a 
character, location 704 (short-hand FC) is POKEd 
with the ASCII value of the desired character. For 
example, the following lines of code will build a 
border around the screen ‘‘W’’ wide composed of 
character ‘‘C’’: 

1 POKE FC,C : POKE SR,0 : POKE LR,24 

2 POKE SC,40-W : POKE LC,W-1 : SYS(826) 

3 POKE SC,0 : POKE LC,39 

4 POKE SR,25-W : POKE LR, W-1 : SYS(826) 

Lines 1 and 2 generate the sides of the border, and 3 
and 4 the top and bottom. Notice that the routine 
uses the wraparound (start > last) feature to 
generate two sides of the border with the same 
subroutine call. 


Reversing And Flashing 

When you wish to reverse the area, the Fill 
Character, location 704, is POKEd with zero. A 
special case of reversing is to flash the rectangle on 
and off with fast multiple reversing. This effect is ob- 
tained by POKEing location 711 (IT) with the 
number of times the area is to be reversed, and loca- 
tion 709 (JD) with the number of jiffies to delay be- 
tween each reverse cycle. For example, the following 
code will flash the entire screen on and off by revers- 
ing it ‘‘N”’ times at a speed of ‘‘D’’ jiffies: 

1 POKE FC,0 : POKE JD,D : POKE IT,N 


2 POKE SR,0 : POKE LR,24 
3 POKE SC,0 : POKE LC,39 : SYS(826) 


Repositioning The Area 

The rectangle can be repositioned in a different loca- 
tion on the screen by setting the parameters in loca- 
tions 705 to 708. Location 705 (RD) is POKEd with 
a zero if the relative displacement of the new position 
is up and with 1 if it is down or even. Location 707 
(CD) is POKEd with 0 if the displacement is left and 
with 1 otherwise. Locations 706 (RM) and 708 (CM) 
are the number of rows and columns, respectively, 
the area is to be displaced. For example, 

1 POKE RD,0 : POKE RM,10 

2 POKE CD,1 : POKE CM,5 

will reposition the area five columns to the right and 
ten rows up. 

If the ‘‘old’’ area is to be blanked out after the 
repositioning, the Fill Character (FC = 704) should 
have been previously POKEd with 32, i.e., an 
ASCII blank. If FC is zero rather than 32, then both 
the ‘‘old’’ and ‘‘new”’ areas will be visible on the 
screen after returning from the graphics subroutine. 

Since this repositioning is done by relative 
displacement rather than absolute positioning on the 
screen, there will be instances when the new position 
will be ‘‘off the edge.’’ Just how the routine handles 
these situations is determined by the value of the 
Wraparound Factor (WF =710). If this value has 
been POKEd with a zero, the routine will 
automatically wraparound to the other edge(s) of the 


screen. If WF is 1, the portion of the rectangle that 
goes over the edge will not be shown. If WF is 2, the 
routine will automatically recalculate the reposition 
parameters so that the rectangle stops just at the edge 
of the screen. 


Motion Or Animation 

Motion, or animation, is handled very much like 
repositioning, except that the increments of displace- 
ment are smaller (typically only one row and/or col- 
umn) and the number of iterations (IT = 711) and jif- 
fies delay (JD =709) are used to control the distance 
and speed of the movement. For example to show the 
rectangle moving up and to the right at a 30 degree 
angle at a relatively fast pace these instructions could 
be used: 

1 POKE RD,0 : POKE RM,1 : POKE CD,1 : POKE CM,2 
2 POKE IT,10 : POKE JD,2 : POKE FC,32 : POKE WF,0 
Setting WF to zero and FC to 32 assures the ‘‘old’’ 
area is erased and that wraparound is allowed if ap- 
propriate. Even though JD was set to 2, the actual 
“*speed’’ of the movement will depend on the size of 
the rectangle — obviously larger areas take longer to 
move than smaller ones — even at machine language 
speed! You should experiment with various values of 
JD to get the speed you want for your specific areas 
to be moved. 

After returning from the subroutine, the 
parameters defining the rectangle will be 
automatically updated to correspond to the new loca- 
tion, so it is unnecessary to keep track of these loca- 
tions in your BASIC program or to rePOKE these 
locations before making another move. However if 
you are moving several different areas 
“‘simultaneously’’, you should save locations 700 to 
703 after exiting the routine and then rePOKE these 
same values before moving again (if there are in- 
tervening moves of other areas). 

Listing 2 has a number of examples of move- 
ment that should be helpful to you in understanding 
how to use this routine effectively. The code at lines 
800 to 870 should be particularly useful because it 
shows an easy and fast way to control motion with 
the numeric key pad. 


Shrink And Growing 

Some very interesting graphic effects are possible if 
you use the routine for repositioning or motion but 
do not POKE the Fill Character with a ASCII blank, 
i.e., a 32. If FC is zero, the ‘‘old’’ area is not 
changed as the ‘‘new’’ area is created. This allows 
the total graphic area to give the appearance of grow- 
ing in size. Once the area has grown, FC can be set 
to 32 and the direction of the movement switched by 
180 degrees and the area will appear to shrink. If FC 
is POKEd with something other than zero or 32, 
movement can be handled against a non-blank 
background, or some other characters can be left 
behind as the ‘‘wake’’ of the movement. 
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Standard Features: | A | | | RY 
Full power to PET/CBM for a minimum of 
15 minutes 
Installs within PET/CBM cabinet 


No wiring changes necessary 


Batteries recharged from PET/CBM inte- 
gral power supply Y ce \ /| 


Specifications: FOR COMMODORE PET/CBM COMPUTERS 


° Physical Size: 5.5’’ x 3.6’ x 2.4” 


Weight: 4.5 lbs. ; 
Time to reach full charge: 16 hours Never again lose valuable data because of 


e 
e 
© Duration of outputs: Minimum of 15 min. — Power shortages or line surges. BackPack sup- 
° Voltages: +16, +9, —12, —9 plies a minimum of 15 minutes reserve power to 
° Battery Life Expectancy: 3 to 5 years 32K of memory, the video screen and tape 
*® Battery On-Off Switch drive. BackPack fits inside the PET/CBM 
cabinet and can be installed easily by even the 
novice user. BackPack is recharged during nor- 
aL, mal operation and has an integral on-off switch. 
For Use With: BackPack comes fully assembled and tested. 
© Commodore PET/CBM 2001 and 4000 ser- __ Instructions included. 
ies computer 
© Commodore PET/CBM 8000 series com- 
puter (screen size will not be normal on 
battery back-up) 
¢ Commodore C2N Cassette Drive 


i 
ooo OeeeaaaaaaSea=—a—s——— 
BackPack is a trademark of ETC Corporation 
CBM/PET are trademarks of Commodore Business Machines 
 ————— 
Designed and manufactured by: 


ELECTRONIC TECHNOLOGY CORPORATION Electronic Manufacturing 
P.O. Box G, Old N.C. 42 Technical Design and Development 
Apex, North Carolina 27502 Computer System Technology 
Phone: (919)362-4200 or (919)362-5671 


in l ELECTRONIC TECHNOLOGY CORPORATION 


ul mull 
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Lines 880 to 980 in Listing 2 give a good exam- ore Deere aia ae oak a oae 
j i i j a , , 7; , Ls , , 
ple of using the routine to grow and shrink objects. 520 DATA34,24,104,105,25,230/59,197,59 
Conclusions 530 DATA208,16,133,54,24,165,1,195,40 
. . . 549 DATA133,1,144,22,230,2,24,144,17 
T hope you have as much fun using this routine aa 550 DATA133,54,32,213,3,24,144,9,169 
did in writing it. If you develop any new or unusual 560 DATA15,133,60,104,169,0,133,54,165 
uses for this routine drop me a note — or better yet, 570 DATA54,133,59,96,24,165,54,101,68 
tape copy of the program. 589 DATAS6 ,201,25,144,45,233,25,72,165 
If you don’t want to spend the effort keying in ay oe eg oe gee ar arte Se 
nf sor: 7 , ¥: , , , , , ree 
the code in the Listings, send me $5.00 and I will 610 DATAG61,133,68,169,24,133,54,169;131 
send you a tape containing both the graphics loader 626 DATA133,2,169,192,133,1,24,144,44 
program (Listing 1) and the demo program (Listing 2). 630 DATA201,0,208,31,104,198,59,197,59 
648 DATA208,16,133,54,56,165,1,233,40 
Listing 1 650 DATA133,1,176,22,198,2,24,144,17 
668 DATA133,54,32,213,3,24,144,9,169 
19 CLR:POKE59468,12 678 DATA15,133,69,104,169,24,133,54,]65 
20 REM PROGRAM BY DAVID MALMBERG 686 DATA54,133,59,96,169,0,133,74,165 
30 REM 43664 VIA MORAGA 699 DATA69,208,47,56,165, 76,229, 70,16 
40 REM FREMONT,CALIF 94538 766 DATA93,72,165,72,201,2,208,12,24 
5@ REM (415) 651-6921 716 DATA164,191,79,133,70,169,9,133,73 
6@ IFPEEK (59996)=@THENPOKE134,9: 720 DATA240,74,201,0,208,7,24,104,105 
3POKE135, PEEK (135) -3:GOTO8@ 736 DATA40,24,144,63,169,15,133,74,104 
70 POKE52,@:POKE53, PEEK (53)-3 746 DATA169,9,24,144,53,24,165,76,101 
88 CLR 750 DATA7®,56,201,40,144,43,233,40,72 
96 22=53: IFPEEK (50690) =OTHENZZ=135 766 DATA165,72,261,2,268,19,104,133,61 
199 QQ=PEEK (22) 779 DATA169,9,133,73,56,165,70,229,61 
116 PRINT"A"TAB(12) "LOADING 2ND - 789 DATA133,70,169,39,24,144,15,201 
aCASSETTE" 790 DATAG,208,4,104,24,144,7,169,15 
129 PRINT"h¥YMACHINE LANGUAGE GRAPHICS" 800 DATA133,74,164,169,39,133,75,96 
138 PRINT"hV¥V¥V¥BY DAVID MALMBERG" 816 DATA165,67,208,11,165,62,133,55 
146 FOR I= 826 TO 1915 :READDC: POKEI,DC: 820 DATA165.63,133,56,24,144,8,165,63 
aPRINT"h";1;DC:NEXTI 839 DATA133,55,165,62,133,56,165,69 
158 DATA32,150,3,56,165,62,201,25,176 848 DATA208,11,165,64,133,57,165,65 
169 DATA61,165,63,201,25,176,55,165,68 858 DATA133,58,24,144,8,165,65,133,57 
176 DATA201,25,176,49,165,64,201,40,176 860 DATA165,64,133,58,165,55,133,54 
189 DATA43,165,65,261,40,176,37,165,79 870 DATA32,213,3,165,1,133,52,165,2 
199 DATA261,40,176,31,165,68,268,10,165 888 DATA133,53,169,175,133,59,166,55 
200 DATA79,208,6,32,9,16,56,176,3,32 890 DATA134,54,134,77,32,76,16,164,57 
216 DATA119,17,32,133,3,165,73,240,7 908 DATA132,76,32,8,17,166,77,165,69 
228 DATA198,73,240,3,76,98,3,32,168,3 910 DATA208,14,165,74,208,19,177,52 
230 DATA96,165,71,246,12,169,0,141,143 926 DATA132,61,164,75,145,1,164,61,165 
246 DATAG,165,71,2605,143,9,208,251,96 930 DATA66,240,2,145,52,196,58,249,26 
258 DATA162,9,181,48,188,174,2,157,174 948 DATA165,69,249,19,192,9,208,2,163 
260 DATA2,148,48,232,224,32,288,241,96 956 DATA49,136,24,144,207,192,39,208 
276 DATA162,06,189,174,2,186,48,149,48 966 DATA4,160,0,240,199,266,24,144,195 
286 DATA152,157,174,2,232,224,32,208 976 DATA228,56,246,66,165,67,240,31 
290 DATA249,96,169,0,133,51,162,8,19 986 DATA224,0,208,12,162,24,169,131 
308 DATA38,51,6,49,144,7,24,191,48,144 996 DATA133,53,169,192,133,52,208,162 
319 DATA2,239,51,202,208,239,133,59,96 1998 DATA292,56,165,52,233,49,133,52 
320 DATA169,9,133,1,133,2,165,54,240 1616 DATA176,152,198,53,24,144,147,224 
338 DATA17,133,48,169,46,133,49,32,187 1626 DATA24,208,12,169,128,133,53,169 
346 DATA3,165,50,133,1,165,51,133,2,24 10638 DATAG,133,52,162,9,240,131,232,24 
358 DATA165,2,195,128,133,2,96 1048 DATA165.52,105,40,133,52,144,227 
368 PRINT"h"TAB(12) "LOADING HIGH MEMORY 7 1059 DATA239,53,24,144,222,165,62,133 
a" 1069 DATA54,32,70,16,165,59,133,62,165 
378 AA=0QQ*256 1976 DATA63,133,54,32,7G,16,165,59,133 
389 FORI=AATOAA+626:READDC: POKEI,DC: 1686 DATA63,165,64,133,76,32,8,17,165 
aPRINT"h";1;DC:NEXTI 1699 DATA75,133,64,165,65,133,76,32,8 
398 DATA165,62,133,54,32,213,3,166,62 1160 DATA17,165,75,133,65,96 
i Dre deol Lennon tan 1119 REM MODIFICATIONS FOR RELOCATION 
, ri, , 9,200,56 1126 F = : : * Fe 
426 DATA192,40,144,236,160,0,240,232 cae ee 
es Be eee ae 1139 DATA448,588,599 
124, 11,195,46,133,1,144 1146 FORI= fi 3) ly 
458 UReer228 2,987 176,206, 16290, 136 Se READA: POKEQQ*256+A,QQ+1: 
DATA1,169,128,133,2,208,196,96,169 115 
470 DATAO,133,60,165,67,208,87,56,165 lige Foreeze co 
480 DATA54,229,68,16,36,72,165,72,201 1176 POKE882.00+1 
499 DATA2,208,21,24,1064,101,68,133,68 1188 REM MODIFICTIONS FOR OLD ROMS 
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JINSAM 


CB Commodore 


8.0 


Approved Software 


JINSAM Opens The Desk Top 
Computer Doors To 
Easy Application Data Management 


“You're in good hands 
with the data manager 
from JINI MICRO- 

SYSTEMS, INC. JINSAM 
is a fast and extremely 
flexible data manager.’ 


Robert Baker 
Kiloobaud 


“So far, JINSAM 
appears to do 
everything my Hawlard 
Packard data base 


does. My HP system 
cost $6000 and JINSAM 
iS easier to use.” 


Ed Presnal 
Marketing Manager 
Phoenix Distributing 


“We've printed over 
30,000 labels with 
JINSAM. We no longer 
have an outside 
contract. My principal 
is so pleased that he’s 


CBM 8032 


given us three more 
PET’s and the Mother’s 
and Father’s Cluo 
(PTA) has donated a 
new printer with the 
money we've saved. 
We’re now also using 
JINSAM for fundraising 
and accurate records 
for recruitment 

target areas.” 


George Marstatt 
Mt. St. Michael’s H.S. 
New York City 


JINI MICRO SYSTEMS, INC. 
Box 274 Riverdale, NY 10463 


DEALER INQUIRY WELCOME 
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1190 IFPEEK (50000) <>OTHEN1220 250 REM FLASH SCREEN 
1209 FORI=1T04:READA:POKEA, 2:NEXTI 260 POKEFC, @:N=39:D=15 :GOSUB7300 
1219 DATA908,909,913,914 270 REM MAKE REVERSE SQUARES 
1220 PRINT"ArLOCATION? | x1DESCRIPTIONE" 289 C=0:FORW=1T04:GOSUB7205 :0=TI 
1230 PRINT" 700 STARTING ROW" 290 IFTI-0<30THEN299 
1240 PRINT" 701 LAST ROW 300 NEXTW 
1250 PRINT" 702 STARTING COLUMN" 310 W=4:C=32:GOSUB7100 
1260 PRINT" 703 LAST COLUNN" 320 OSUB7109 
1270 PRINT" 704 FILL CHARACTER" 330 :GOSUB7300 
1280 PRINT" 705 ROW MOVE DIRECTION 340 :GOSUB7309 
a" 350 : :GOSUB7169 
1290 PRINT" o=UP" 360 REM MOVE LEFT:GOSUB7000 
1300 PRINT" 1=DOWN OR TO 4 370 POKERS, 6:POKELR,19:POKESC,5: 
aSIDE" =POKELC, 35: POKERD, 0: POKERN, 9 
1310 PRINT" 706 # OF ROWS TO MOVE" 380 POKERM,@:POKECD,1:POKECM,1:POKEIT, 
1320 PRINT" 707 COLUMN MOVE 7 340: SYS (SY) 
aDIRECTION" 390 REM MOVE DOWN 
1330 PRINT" O=LEFT" 400 POKERD,1:POKERM,1:POKECD,9:POKECM, 9: 
1340 PRINT" 1=RIGHT OR EVEN" 4POKEIT, 25: SYS(SY) 
1350 PRINT" 708 # OF COLUMNS TO - 410 REM MOVE UP & OFF 
=MOVE" 420 POKERD,9:POKECD,1:POKECM,1:POKEWF,1: 
1360 PRINT" 709 # OF JIFFIES 3 “POKEIT, 20: SYS (SY) 
“DELAY BETWEEN" 425 PRINT"A":PRINT 
1376 PRINT" ITERATIONS" 430 REM SHIP & R2D2 
1380 PRINT" 719 WRAPAROUND FACTOR" 440 PRINT"h":AS=LEFTS$(C$,11) :GOSUB5000 
1396 PRINT" G=WRAPAROUND IS 7 450 AS=LEFTS$(C$,1):PRINTLEFTS$(RS,14): 
0K" =GOSUB5 209 
1406 PRINT" 1=DISAPPEAR OFF - 460 A(G)=0:A(1)=9:A(2)=11:A(3)=39 
EDGE" 470 A(5)=1:A(6)=:A(7)=0:A(8)=1:A(4) =32 
1419 PRINT" 2=MOVE TO EDGE - 475 GOSUB7006 :AS=LEFT$(R$,15)+LEFT$(CS, 
ONLY" 39) 
1420 PRINT" 711 # OF ITERATIONS + 480 POKESR,13:POKELR,24:POKESC,0: 
sBEFORE EXIT" 4POKELC, 13: POKEFC, 32: POKERD, 1: 
1430 PRINT" 826 SYS LOCATION FOR aPOKERM, 9 
sROUTINES" 490 POKECD,1:POKECM,1:DL$=6 
1449 END 495 FORK=1T02 
505 DL$=0.5*DL%:POKEJD, DLS: POKEIT, 40 
510 FORJ=0T08:B(J)=PEEK (700+J) : POKE700+0 
Listing 2 ae :NEXTJ:SYS(SY) 
540 PRINTAS"..,BEEP BEEP" :Q=TI 
@ :CLR:POKE59468,12 350 IFTI-Oc6OTHENSSO 
1 REM MACHINE LANGUAGE GRAPHICS DEMO BED BRENTAS® ‘ 
2 REM PROGRAM BY DAVID MALMBERG 553 DL$=1.5*DL%:POKEJD,DL%:POKEIT, 40 
3 REM 43064 VIA MORAGA 555 FORJ=0T08:A(J)=PEEK (700+) : POKE7G+d 
4 REM FREMONT, CALIF 94538 =, B(J) :NEXTJ: SYS (SY) 
5 REM (415) 651-6921 560 PRINTAS"...SQEEEEEEK":Q=TI 
106 QQ=53:KY=151: IFPEEK (50090) =OTHENQQ=1 370 IFTI-O<60THENS 70 
n35:KY=547 380 PRINTAS" ‘i 
119 AA=PEEK (QQ) *256 SOGt RnR TE 
126 IFPEEK (826) <>32ORPEEK (AA) <>165THENPR : , 3 
AINT"AMACHINE LANGUAGE NOT LOADED": wi ye ee ag ae aa en 
END = eg 
130 SR=700:LR=701:SC=702:LC=703:FC=704: Pe GRA Coe coset eae 
aRD=795 : RM=796 : CD=797 : CM=798 630 IFTI-Q<60'THEN6 30 ‘ 
tena He FRE sera 
R$=" WVVVVVVVV": - 2 P aT 
ACS= "3999593999999 999999999999 a a eee 
3" : 
709 REM SPACE SHIP 
in AoRND (rr) <D ames (8).-8(8) 88) 710 GOSUB7500:PRINT"A"LEFTS$(R$,19) : 
= (1)) ei 
180 FORI=OT08 : READX$ (I) :NEXTI 7AS=LEFTS (C$, 18) :GOSUB5199 
190 DATA209,214,215,223,102, 42,127,218 iat eae tere ee NUMEETE REY FO 4 
ae 72157223 ,102, 42,127,218, >CONTROL DIRECTION" 
200 ASCLEPTS(C$,11) :S=LEFTS (CS, 5) 730 PRINT io enisa Of WHEN YOU WISH - 
PR i" " 2 be 
215 ee ee 740 POKESR,1:POKELR,5:POKESC,1:POKELC, 
SonNGOSUnTeRGTiEs 339: POKEFC, 0: POKEIT, 9: POKEJD, 20: 
230 FORI=8T08 : C=X$ (I) :GOSUB7160:Q=TI 759 oe 
ria ee 760 IFTI-Q<180THEN766 
A ereeen aGIRERTT: 770 POKEFC,32:SYS(SY) 
E 780 POKESR,19:POKELR, 24:POKESC,18: 
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798 
795 


800. 
805 
818 
820 
830 
840 


850 
868 
878 


880 
890 


960 
916 
926 
925 
930 


935 
946 


950 
968 
965 
976 
980 
1665 
1619 
1626 
1038 
1046 
1656 


1066 
1076 
1675 
1696 
11695 
1119 
11296 
1136 
1146 
1145 


1159 
5008 
50198 
5028 
5636 
5646 
5656 
5066 


5076 
5686 
5696 
5095 


5166 
5116 


4POKELC, 22: POKEJD,@: POKERD,G: 
3POKERM, 1 
POKECD,1:POKECM,9:L=255 
REM MOVEMENT USING MATRIX VALUE OF - 
aKEY BEING PRESSED 
K=PEEK (KY) : IFK=2550RK=34THEN8O6 
IFK=LTHEN869 
IFK=16THEN870 
IFK>49THENPOKERD, 0: POKERM, 1 :GOTO848 
POKERD, 1: POKERM, 9: IFK<39THENPOKERM, 1 
POKECM, 1: POKECD, 1: IFK=580RK=420RK=26 
saTHENPOKECD, 9 
IFK=5GORK=1 8THENPOKECM, 8 
SYS (SY) :L=K:GOTO800 
FORI=1T019:GETZ$:NEXTI:REM EMPTY - 
aKYBD BUFFER 
REM ARROW GROWS 
GOSUB799 : POKESR, 10: POKELR,17: 
3aPOKESC,9:POKELR,17:POKEIT,7: 
=POKEJD,5 
POKERM, 1:POKECM,1 
PRINT"A" : GOSUB6209 
FORK=1TO5 : POKEJD, 5-K:Q=TI 
IFTI-Q<120THEN925 
POKEFC,@:POKERD,1:POKECD,1:SYS(SY): 
3Q=TI:REM GROW 
IFTI-Q<66THEN935 
POKEFC,32:POKEIT,19:POKERD,6: 
3POKECD,8:SYS(SY):REM SHRINK 
POKEIT,10:NEXTK 
Q=TI:REM SHOOT OFF SCREEN 
IFTI-Q<126THEN965 
POKESR, 9: POKESC, 8: POKERD, 1: POKECD,1 
POKEJD, 9: POKEWF,1:POKEIT,26:SYS(SY) 
REM REVERSE DESIGN 
GOSUB7969: POKEJD, 16 
PRINT"A":Q=1:K=9:GOTO1949 
Q=FNR (4) +1: K=FNR (23) 
FORI=KTO24STEPQ 
POKESR, I: POKELR, 24-I:POKESC,I: 
APOKELC, 39-1: SYS (SY) :NEXTI 
IFRND (1) >. 9THEN1926 
GETZ$: IFZS$=""THEN1639 
REM SUPER GRAPHICS 
AS=LEFTS (C$,11) :BS=LEFTS$(C$,5) 
PRINT"A"LEFTS (RS$,6) :GOSUB6909 
GOSUB7996 : POKEJD, 26 
C= : FORW=1T04 : GOSUB7 206 :Q=TI 
IFTI-Q<39THEN1139 
NEXTW 
FORI=1T019:GETZ$:NEXTI:REM EMPTY - 
aKYBD BUFFER 
END 
PRINTAS" 
PRINTAS" 
PRINTAS" 
PRINTAS" 
PRINTAS" 
PRINTAS" 
PRINTAS" 
ar FMSSs$ 
PRINTAS" ge", ..f 
a. F""@@ 
PRINTAS" 22 asc tah, ers 
1 


"a £& 
PRINTAS" “xr 
“Ls 
RETURN 
PRINTAS" '> " 
PRINTAS" rx) “? " 


PET’ MACHINE LANGUAGE GUIDE 


PET 
MACHINE 
LANGUAGE 
Contents include sections on: 
GUIDE ® input and output routines. 
® 1 ixed point, floating point, 
and Ascii number conversion 
® Clocks and timers. 
@ Built-in arithmetic functions. 


® Programming hints and sugges 
tions. 


® many sample programs. 


While supply lasts 

Guides for Old ROMS 
only $5.00 inc. postage 
New ROMS order below. 


If you are interested in or are already into machine language 
programming on the PET, then this invaluable guide is for 
you. More than 30 of the PET’s built-in routines are fully 

detailed so that the reader can immediately put them to good 
use. 

Available for $6.95 + .75 postage. Michigan residents please 

include 4% state sales tax. VISA and Mastercharge cards 

accepted - give card number and expiration date. Quantity 

discounts are available. 


[eeeeesss tt if ABACUS SOFTWARE 


HEE Ce ates 49510 


3 
Pp = sPowe 4 PET Products 
from 


OPTIMIZED DATA SYSTEMS! 


—SOFTWARE FOR ALL PET/CBMs— 
(Supplied on Cassette—Prices include Shipping) 


@ WORD PROCESSOR (PS-001). 
‘Makes documents a snap 
@ MAILING LIST (PS-002) 
Throw away your address book 
@ SPACE EATER (PS-003) 
Gobbles spaces in BASIC programs 
@ CATALOG (PS-004) . 
File stamp/coin/ete. collections 
@ SATELLITE TRACKER (PS-005) .. 
Tracks OSCAR Ham Satellite in real 
@ MORSE CODE KEYER (PS-006). . - 
Sends code on the air or for practice 
Se MINI-COUNT™™: (Ps-007) 
Measures frequency to 17KHz and intervals to 65 msec 


—HARDWARE FOR “OLD” 8K PETS— 


@ 2114 RAM ADAPTER 
Replaces up to 8-6550s with low cost, reliable 2114s 


PHB-001 (Bare PCB) ... $8.95 PHK-001 (Kit—2sockets) . . . .$13.95 
PH foley (Assm-sockets PHK-001S (Kit—8 sockets) . . .$16.25 


ly). $22.95 
x PHOOt (Assm—2 sockets + one 2114) . -$24,95 


xe 4K MEMORY EXPANSION 
Installs easily internally. Uses 2114s. Write Protect. 


PHB-002 (Bare PCB) ... .S16 PHK-002 (Kit-sockets only) 
PH-002S (Assm-sockets PH-002 (Full Assm) 


(+ $1.50 per order) 


- (+ $3 per order) 


PROMPT SHIPMENT! 
Calif. Residents, add 6% Tax SATISE ACTION GUARANTEE 


P.O. Box 595, Dept. C — Placentia, California 92670 


MINI-COUNT Trademark of Optimized Data Systems ‘VISA 
PET/CBM Trademark of Commodore Business Machines 
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5126 
5136 
5149 
5158 
5206 
5216 
5226 
5236 
5246 
5258 
5268 
5276 
5286 
5296 
5300 
5319 
6669 


6616 
6026 
6036 
6048 
6056 


6068 
6082 
6084 
6092 
6694 


6162 
6164 


6112 
6114 
6122 
6124 


6132 
6134 
6146 
6206 
6219 
6226 
6230 
6246 
6256 
6268 
6278 
6288 
6298 
6308 
6319 
6320 
6338 
6346 
6356 
6368 
6378 
6388 
7666 
7616 
7166 


7116 
7126 


PRINTAS" xr > f " 

PRINTAS"r) USA*E" 

PRINTAS"Nr) "*fM" 

RETURN 

PRINTAS">r)O;f)M" 

PRINTAS">r 27) M" 

PRINTAS">r<f) M" 

PRINTAS">) UL M" 

PRINTAS">M _]]_ 4M" 

PRINTAS">>M_1] x” 

PRINTAS">>>M11 ng" 

PRINTAS">>3>>]11 NN" 

PRINTAS">>3>]1 NY" 
PRINTAS">>>>]]MNNMM" 

PRINTAS">>>r) ((*?>>r) ((*" 

RETURN 

PRINTAG DIO rr feb ESP ee 
ar te" 

PRINTAS"r fefxrfrfixce® 
ar 2 ae Ome 
PRINTAS"“*r*f 
ey 
PRINTAS" *r*f 
ar fe" 


PRINTAS "zr 


Er F 
zr 

AS"n FrFxrcfrft*rcet re a 
BE 


Ee 


FAY aks 
i 
a al 
> 


9 reer or 
PRINTAS"*r f) 

ar or 
PRINT 
PRINTB$S"r) *f x 
PRINT" r frfic 
PRINTBS"r frfix 
PRINT" cf pi for £ 

Sky ibekt & 
PRINTBS$"x f 

ts 


my: 


PRINTBS"y 1 fx 
PRINT" piper i 
PRINTES"r fF © Ear fort = 
PRINT" x f nt £ 
ape y f° 
PRINTAS Sr Perr rire rc ifiur f 
PRINT" or Se or ae £ rE 
RETURN 
PRINT" 
PRINT" 
PRONE’ o UMN 
PRINT" SSSNM$$%" 
PRINT"\SSM M33" 
PRINT" \S#M_ M3" 
PRINT" \##M M" 
PRINT" ###M M" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
RETURN 
REM SUB TO ZERO PARAMETERS 
FORM=8TO11 : POKE7@6+M, 0 :NEXTM: RETURN 
REM SUB TO BUILD A BORDER W WIDE 1 
WITH CHARACTER C 
POKEFC,C:POKESR,@: POKELR, 24 
POKESC, 49-W: POKELC,W-1:SYS (SY) 


h 
» 
h 


> 


lor 


arte 


ee 
Rr gE 
EN ey 


7136 
7146 


7206 
7216 
7220 
7238 
7308 
7316 


7328 


POKESC,@:POKELC, 39 

POKESR, 25-W: POKELR,W-1:SYS(SY): 
aRETURN 

REM SUB TO FILL AN AREA WITHIN A = 
=BORDER W WIDE WITH CHARACTER C 
REM IF C=6 THEN REVERSE AREA ..IF - 
3C=32 THEN BLANK AREA 
POKEFC,C:POKESR,W: POKELR, 24-W 
POKESC,W: POKELC, 39-W: SYS (SY) : RETURN 

REM SUB TO REVERSE SCREEN N TIMES 7 
aAWITH D JIFFY DELAY BETWEEN 7 
aITERATIONS 
POKEJD,D:POKEIT,N:POKESR,@: 
aPOKELR, 24 
POKESC,9:POKELC,39:SYS(SY):RETURN © 


SELECT-A-ROM 


SELECT —-A— ROM 


For the Commodore PET/CEiM 


With one rotary switch select 1 to G 
separate ROMS or EPROMS, with- 
out damaging your computer board 
or rom pins. Now you can use Word- 
Pro, Toolkit, Visicalc, Eproms as 
2716's or 2532's etc. 


Assembled S80 post paid. 
Kit $45.00 post paid. 


Coming in March! 


A switch between old basic 2.0 and 
new 4.0 basic ROMS. Now you can 
utilize your computer with new and 
old software. (Write for details). 


MRJ 7951 No. 4 Ad., Richmond, B.C., 
Canada, V6Y 2T4 
Telephone (604) 273-3651 
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ECX 
COMPUTER 
CoO. 


Specialists 
In Commodore 
PET Equipment, 
Peripherals 
And Software. 


* All Commodore Business Machines Co. Products 
* C101: Centronics/NEC to IEEE-488 (PET) 
Interface 

* C102: Watanabe Digiplot to IEEE-488 (PET) 
Interface 

* C232: IEEE-488 (PET) To RS-232C Bi: 
face $ Call 

* X232: PET To RS232C Bi-Directional Interface $ Call 

* Watanabe “Digiplot” Intelligent Graphics 

Plotter 

* Curve: Graphics Software Package For The 

And Pet . $295.00 
* SX-100: IEEE-488 Modem polwvare (For Commodore 
Model 8010) $ 35.00 


. -$225.00 


. $295.00 
rectional Inter- 


* MX-200: Custom Parity IEEE-488 Modem With SX-200 


Software $449.95 
* PET Computer System Desk, Walnut or Oak . . . $395.00 
* NEC Spinwriter Printer Stand: Matches Desk Noted 


$275.00 
We Offer Fast And Effi 
All Commodore Business Machines 
Equipment! 
Send it to us and you will have it back 
usually within a week! 
ECX Computer Co. is owned and operated 
by Com-Plications Inc., a design and 
development corporation specializing in 
IEEE-488 (PET) peripherals and software. 
Call Us: We Talk Technical! 


All Com-Plications Inc. peripherals are 
manufactured to industrial quality standards. 
If you -want to know more about the IEEE-488 

Bus, read our new book, published by Osborne/ 
McGraw-Hill, “The Pet And The IEEE-488 (GPIB) 
Bus”. Authored by the president of Com-Plications 
Inc. and available from us for $20.00 (includes tax and 
shipping). 

P.S. All of our IEEE-488 interfaces meet “all” the 
specifications of IEEE-488: 


ECX COMPUTER COMPANY 
2678 North Main Street #6 
Walnut Creek, CA. 94596 
(415) 944-9277 
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HARD WORKING SOFTWARE 


for PET/CBM "Sperating systems 1.0 to 3.0 


MATRIC Bewnants Commodore BASIC with fourteen new 
commands for handling arrays. Algebraic style syntax. 
Checks for conformability. Extended error messages. 


The 5K machine language program lets you-- Display a 
matrix on the screen and change its values. Transfer data 
between matrices or fill a matrix with a constant. Transpose. 
Transfer diagonals between matrices, or from a matrix toa 
vector, from a vector to a matrix, or filla diagonal with a con- 
stant. Do vector or matrix addition, subtraction, multiplica- 
tion; elementwise multiplication, division, squares, and 
square roots. Inversion. Determinant. Eigenvalues and 
eigenvectors of a square, symmetric matrix. 


Specify size and ROM set of your machine. Tape or disk, 
32-page manuals Price: $125. 


PRO- GRESS. Mmnultiple regression BASIC program reads 
unlimited records from tapes or CBM disk. Up to 45 variables 
in 32K. Permits transformations. Provides means, standard 
deviations, correlations; R, R-square, F, degrees of freedom; 
constant and coefficients, betas, Student's t’s. Output to 
screen, or to ASCII or CBM printer. 


Manual and two programs. Tape: $45. Disk: $50. 

™ 
TEXTCAST II 8K machine language word processor. Easy 
typing and screen editing. Produces ASCII files on tapes or 
disks. Prints with ASCII or CBM printer. Centers, underlines, 
right justifies, numbers pages. Creates data files for 
PRO-GRESS. 


Old/New ROM versions of program, revised manual. Tape: 
$75. Disk: $80. 


ORDER YOUR WORKERWARE FROM: 
Cognitive Products 
P.O. Box 2592 
Chapel Hill. NC 27514 


fom een em em ee ae ee ae ae aaa se 


Computer House Division 
PROGRAMS FOR COMMODORE AND APPLE 


Legal accounting Demo $15.00 
Legal accounting Program 995.00 
Machine Part Quote Demo 15.00 
Machine Part Quote Program 325.00 
Mailing/phone list 80.00 
Political Mail/phone list 130.00 
Beams, structural 115.00 
Trig/Circle Tangent 110.00 
Spur Gears 35.00 
Bolt Circles 25.00 
Filament Wound TAnks 125.00 
Scrunch 25.00 
PROGRAMS FOR COMMODORE ONLY 

AIP, AIR, Job Cost & Job Est. 370.00 
Inventory 95.00 
Financial 175.00 
Real Estate Listings 265.00 
Check Writer 25.00 
File Editing Tools (FET) 65.00 
Screen Dump/Repeat 35.00 
Docu-Print 20.00 
Scrunch 25.00 
Sof-Bkup 40.00 
Sorter (Mach. Language) 35.00 
Trace-Print 25.00 
Vari-Print 25.00 


ASK FOR CATALOG #80-C2 Dealers Wanted 
Computer House Div. 1407 Clinton Road 
Jackson, Michigan 49202 (517) 782-2132 


See ee ae a 
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Disk File 
Recovery 
Program 


David L. Cone, Sunnywale, CA 


Have you ever been working happily along on a pro- 
gram, updating it periodically on your disk, only 
suddenly to discover that something wierd has hap- 
pened and you’ve apparently lost half of the pro- 
grams on the disk. (I’ve even had the case where the 
programs disappeared from the directory while the 
number of blocks remaining stayed the same). 
Maybe what happened was that AFTER you 
scratched the program from the disk you found that 
the PET had also gobbled up your program in 
memory — (or you did). Or perhaps you had done a 
short ‘new’ of a disk only then to realize that valued 
programs were on it! 

If you’ve ever been in this frustrating position of 
knowing your program was just sitting there on the 
disk with no easy way to get it back, this DISK 
FILE RECOVERY program will help — it will 
recover such programs. As long as you can still in- 
itiate the disk and have not written a new program 
over the file you want, you can recover it. It cannot 
recover programs from a disk which will not initiate 
or upon which a long ‘new’ (ie. a ‘new’ with a disk 
number) has been performed. 

The disk works this way: When a file is placed 
on a disk, part of the information placed in the direc- 
tory on track 18 is a pair of pointers giving the track 
and sector numbers of the block where the file 
begins. The first two bytes of this block are also 
pointers giving the next track and sector numbers. 
This process continues until the last block is reached. 
For the last block, a 00 is placed in the first byte and 
nothing appears to be done to the second. Files are 
stored in a somewhat alternating way below and 
above track 18. The first file is stored starting at 17,0 
(track 17, sector 0). When track 17 is filled, the next 
new file appears to be started at 19,0 and so on back 
and forth. If you have lost or destroyed track 18, the 
problem is then how to find and identify the initial 
blocks of the lost files and then to recover the files. 

This is what the RECOVERY program does! 
First, it gives you the choice of working with either 
the lower band (tracks 17 to 1) or upper band (tracks 
19 to 35), and on which track you wish to stop. It 
sets up an integer array [D%(35,20,3)] which can 
receive for each block the ‘‘in’’ pointers (ie. the track 
and sector numbers of the block which ‘points’ at it) 
and the ‘‘out’’ pointers (ie. the track and sector 


number of the block at which it points. The program 
then scans the first track for these pointers. What we 
are looking for are blocks which have no ‘‘in”’ 
pointers, for they must be the ones pointed at by the 
directory and thus the initial blocks for any files. 
Next the program takes each initial block and follows 
that file through all its blocks to the end, filling in 
the array as it goes. Each subsequent track is simi- 
larly scanned and as new files are found they are 
traced. You have the option of stopping this process 
at any point. Meantime, the program has kept track 
of the start and end of each file and the number of 
blocks it uses. This summary is presented on the 
screen. 

The next major problem is the identifying which 
file is which (since only the disk knows where a file 
was saved and on which half of the disk). The pro- 
gram offers you a number of appropriate options at 
this point, and the most useful one for file identifica- 
tion is labeled LOOK. LOOK pulls the initial block 
of any file out and extracts information that will pro- 
bably allow you to identify the file. First, it displays 
in a useful form the first four pairs of bytes. The first 
pair are the pointers to the next block. If the file is a 
program the next pair of bytes tell where the pro- 
gram is to be loaded in memory. For Basic pro- 
grams, this is usually 1024. The third and fourth 
pairs of bytes are from the program itself. They are 
the link and line number of the first instruction in 
the basic program. If the file is a machine language 
program or a sequential file, then you get weird and 
meaningless values for the link and line numbers. 
Next, LOOK gives you the first 48 bytes of the pro- 
gram in hexadecimal form (as if they were being ex- 
amined by the machine language monitor). Finally, 
LOOK gives you a printed ‘‘translation’’ of the first 
240 bytes. Basic commands are tokenized and appear 
as reversed characters or symbols. The link and line 
pointers also can look quite strange. However, 
numbers, variables, anything between quotes, and 
REM statements all appear as usual. Thus, if you 
have some convenient identifications at the beginning 
of your program, you will be able to recognize them. 
To see how this ‘‘translation’’ takes place, see lines 
1360-1390 and 5090-5095. Eighty characters are 
scanned at one time and you can go from one set of 
eighty to another. With this amount of information it 
is usually quite easy to determine what any file is 
and if you wish to recover it. 

Aside from LOOK, you have the following op- 
tions: 1) SUMMARY REVIEW — this gives you 
the start block of any file and the number of blocks 
in that file. You need to know the start block to 
either look at or recover a file. Also, the number of 
blocks in the file may aid in its identification. 2) 
RETRIEVE A FILE — here is the point of all of 
this; now you get the program or file back! The pro- 
gram asks for all the essential things: starting track 
and sector, the name you want for the recovered file 
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McTerm 


A Telecommunication Package 


With the McTerm package your Commodore computer can now become a very intelligent 
terminal. It allows you to easily participate in the electronic mail revolution. McTerm can 
communicate simultaneously with another PET or mainframe. You can transfer entire disk files 
to other disk drives; send or receive program, WordPro, sequential, or relative files. This 
package works on Commodore computers with 3.0 or 4.0 Basic, 1.0 or 2.0 DOS, 40 or 80 column 
computers, and 2040 or 8050 disk drives (requires the use of TTL Level RS-232 modems). 


Complete with Program, ROM, Cable and Manual. 


Price: $195.00 
Features include: 


-Baud selection from 75 to 1200. 

-Full and half duplex, also local echo. 
-Supports odd, even and mark parity. 
-CRC, error checking for PE7 to PET files. 


1825 MONROE STREET, MADISON, WI 53711 (608) 255-5552 
-Dealer Inquiries Are Welcome- 


Big power 
Seal package. 


MACHINE LANGUAGE UTILITY-PAC 1.2R 


ROM BASED FIRMWARE INCLUDES 43 COMMANDS TO 
ENHANCE USE OF YOUR COMPUTER INCLUDING DGS! 
INCLUDES ASSEMBLER, DISSASSEMBLER, HUNT MEMORY. 
QUICK TRACE, COMPARE MEMORY. TRANSFER MEMORY, 
RELOCATOR, WALK CODE, INTEGRATE MEMORY, VIDEO 
SCREEN DUMP TO PRINTER IN STANDARD OR ENHANCED 
FORM, FILL MEMORY, FAST TYPE CODE ENTRY. HEX TO 
DECIMAL AND ASCII CONVERSIONS & WISE VERSA! 
MOST FUNCTIONS TO SCREEN OR PRINTER. MAKES 
HANDLING AND UNDERSTANDING OF MACHINE CODE 
PROGRAMMING EASIER. ALSC INCLUDED ARE THESE 
PROGRAMS ACCESSIBLE FROM BASIC. REV. PRINT - 
DOS - SCREEN DUMP - ENHANCED SCREEN [DUMP — 
RE/NEW - AUTO REPEAT - DISK APPEND - REV.SCREEN 
- DISPLAY. AVAILABLE FOR 3.@ ROMS AT LOCATICN 
HEX $A@GB. FOR 4.6 ROMS AT HEX $9000 OR HEX 
$A@@@. SPECIFY. MANUAL INCLUDED. WE ACCEPT VISA 
AND MASTER-CHARGE. ORDER FOR 26 DAY FREE TRIAL. 
TOES NOT LOWER USER MEMORY. A MUST FOR NEW OR 
ADVANCED PROGRAMMERS ALIKE! 


4K ROM FOR 3.6 (SAGGG)... eee eens $79.95 + $2 
4K ROM FOR 4.0 ¢$R@GG0R($3000>..$79.95 + $2 


BASIC UTILITIES 4.6 


THIS 4K ROM CONTAINS 19 COMMANDS FOR BASIC 
PROGRAMMING. INCLUDED ARE AUTO - RENUMBER - 
DELETE - FIND - APPEND (TAPE? - DUMP — HELP — 
TRACE - STEP - OFF - REV. PRINT - D.O.S. - 
SCREEN DUMP - ENHANCED SCREEN DUMP - RE/NEM — 
AUTO REPEAT - APPEND (DISK) - REY.SCREEN - 
DISPLAY. MANUAL INCLUDED. THIS ROM IS LOCATED 
AT HEX $900G. THESE PROGRAMS DO NOT LOWER USER 
AVAILABLE MEMORY, & WILL GREATLY ENHANCE YOUR 
PROGRAMMING ABILITY! 


4K ROM IS.. se eeeneneeee o. $79.95 + $2 S&H 


2K ROM W/FIRST 1@ COMMANDS IS....$39.95 + $2 S&H 
PLEASE SPECIFY WHICH ROM SET ‘YOU HAYE, 


COMPETITIVE 


SOFTWARE 


21650 Maple Glen Drive 
Edwardsburg, MI 49112 
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and whether it is a program or a data file. It gives 
one final chance to abort unless everything is ok and 
then it is off and running. 3) SCAN OTHER 
BAND, 4) DIFFERENT DISK, and 5) EXIT PRO- 
GRAM are all obvious. 

The program itself, while complex in details, is 
straightforward in construction. It is divided into the 
following sections: 

400- 492 Program description and credits 

500- 595 Description of all variables 

600- 696 Start of Program — Initial choices 

700- 865 Search for initiator blocks 

1000-1055 Print summary table 

1100-1165 Choices 

1200-1415 Performs LOOK option 

1500-1655 Retrieves the file 

4000-4076 General subroutines 
5000-5109 Disk operation subroutines 

‘““REM**”’ statements are used to show major divi- 
sions of the program while ‘‘REM @”’ indicates 
descriptive statements within these major divisions. I 
have used REM statements fairly liberally and these 
should help in tracing through the details of the pro- 
gram. A pair of REM statements (line numbers 1410 
and 4003) need a special comment: if you have a 
machine language screen dump capability, you 
should SYS to them here. I use a shifted ‘‘P’’ to ac- 
tivate the screen dump. 

A couple of final comments: If you search tracks 
in which there are no programs, you may get a disk 
read error (22 READ ERROR 13,0). If this occurs, 
simply type GOTO 1000 and you will be able to go 
on without any problems. I hope this program is as 
useful to you as it has been to me. I made it because 
I really needed it. You may not need it often, but 
when you do, the situation is likely to be desperate! 


os TRACK SUMMARY TABLE 


SEC § TR IH | TE OLIT 

G 96 ig 

ft AS 14 13 

@& 1 29 11 13 

Sets 12 1g 

basa aa] 13 ie 

os A 19 14 139 

6. Fag 15 64 

oe eI a ! 13 

Soelei9 ime 13 

eee este 18 64 

Jenn ts a 13 

ayia fae 1 ! 13 

125 19 2 ie] 3 
139119 3 | 1g 4 
i4 f13 4 | 13 i] 
15°98 ig s) 1S 6 
161 6 a | 64 138 
17 9 ig t 13 3 
Leah 1g 3 19 SS 
i916 a 26 by 


TYPE ANY KEY TO CONTINUE 
Figure 1. Track 19 Summary Table 
A summary table such as this is made for each track scan- 


ned. The zeros in the IN column indicate the initial block 
of a file. The 64 in the OUT column shows where a file ends. 


GOTOS 
RECOVERED [i SEQUEHCES 
SEQUENCE 1 
TRACK SECTOR 

START 17 a 
FRESEHT BLOCK 11 1? 12 
EMD Le 12 
HUMBER OF BLO ii 

{C-COHT P-PAUSE H-HALT  S-SUMMAR'S 


TYPE ANY KEY TO COMTIHUE 


Figure 2. Recovered Disk Sequence 
As each file is traced, this table keeps track of what is hap- 
pening and summarizes the results. 


GOTOS FIRST PAGE DATA 
TRACK 
TMITIAL BLOCK dir 
BYTES 
BLOCK POINTER @&1 17 18 


DECIMAL VALUE 


PRGRM START 
ST LINK 
LIME # 
HES VALUES 
6: 114 


em 
Bee 


Pe oo cca 


CHARACTER VALUES: 


QJIATHDG@@rS@ | TAG 


B=[he 
=" 4>S0:COPY I ; 


“C* TO COMTINUE: +.°- CHANGE LIME SCAM 


Figure 3. First Page Data Program File 

A typical BASIC program looks this way. Note the follow- 
ing: PRGRM START = 1025; typical 1st LINK and LINE 
# values; and identifiable features in the CHARACTER 
VALUES. (Unfortunately, my dump program does not 
give reversed characters which would assist in identifying 
BASIC tokens). ‘ 
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DR. DALEY’S BEST Mailing List Is Now Better! 


DR. DALEY has taken his best selling mailing list and made it even better! This version has 
been totally revised to increase the reliability of the files and make it even easier to operate. 
Several new features have been added: 


Goof-proof input routine. Eliminates the irritating results of accidentally pressing 
some cursor control keys. This is a machine code routine so it is as fast as you are! 
BONUS—Auto repeat on all keys! 


Interface to allow output of the entire mailing list or virtually ANY subset to WORD- 
PRO III and WORDPRO IV format files so you can use these to generate personal- 
ized form letters. YOU can format the structure of this output! 

Routines to merge files and to minimize the number of duplicate entries in a file. 
More machine code routines to speed up processing. 

In addition you have the same powerful file formatting options where YOU can 


determine the structure of the files. YOU can format your label output with up to 11 
lines per label and from 1 to 8 (yes EIGHT) labels per line. 


This system is completely menu driven. It includes 100 pages of user documentation. This 
documentation is for the end user and is not padded with listings, flow charts, and other such 
extraneous material. 


This program will be available for a short time at the introductory price of $159.95. It is 
available for the 32K PET and CBM 3000, 4000 and 8000 series computers. You can order 
through your dealer or directly from us. We will accept VISA or MASTERCARD or your check 
or money order. Overseas orders include 10% to cover shipping. 


Charge to 
your master charge VISA 
THE INTERBANK CARD 
Mepis ‘Sea 


DR. DALEY’S Software 


425 Grove Avenue, Berrien Springs, MI 49103 
Phone (616) 471-5514 
Sunday - Thursday noon to 9 p.m., Eastern Time 
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BoTOS a? 
GoTos FIRST FAGE DATA FILE SUMMARY! 
TRACK SECTOR SEQ # BLO START 
INITIAL BLOCK 26 a TR SEC TR SEC 
EYTES 1 11 iy ete tae 
BLOCK POINTER a1 2 18 2 13 i 31. ie | 5 
DECIMAL VALUE 3 3 16 8 16 2 
PRGRM START 283 ?: 4 ? ae oe 
1ST LINK 465 5 4a 16 6 14 
1ST LINE # ERT é i @ 214 
M WAILUES 7 2 2 
ae & & id i413 


>: 14 BAR GG FH AS & 


7a 35 


i 
2 ed 
40 0G F2 


CHARACTER VALUES: 


TJ GG HED S ST el CRE SES 
LOBEL™2 G@r. A SIH 20m 28 rl... CLO @ 


“C* TO COHTIMUE: +-- CHANGE LIME SCAN 


Figure 4. First Page Data Machine Language 
Program 


This program was put into high memory starting at 28672. 
Note the rather random CHARACTER VALUES, and 
FIRST LINK and LINE values. 


GOTOS FIRST PAGE DATA 
TRACK SECTOR 


IMHITIAL ELOCK 17 1 


ELOCK POINTER 


FRGEM START 
LIME 

LIHE # 
2 VALUES 


GE 


Gy eh en 


2 Se 


QEFREGUEMCY BY REM 7 
RRM MSVCEM S MCMNT: 


M8 MFREGM 7 OM 
SM 24 MUSAGEM 1 MSIG 


“C* TO CONTINUE: +.- CHANGE LINE SCAM 


Figure 5. First Page Data Sequential Data File 

The easiest way to identify this type of file is to observe 
the data items separated by ‘‘M’’ in the CHARACTER 
VALUES section. The ‘*M”’ is the screen representation of 
CHRS§(13) and is in reverse field on the screen. 


TYPE AMS KEY TO COHNTIMUE 
Figure 6. File Summary 
This table summarizes the completed scan results. The 


START track and sector numbers are needed to use the 
LOOK and RETRIEVE options. 


RECOVERED DI 


SEGQUEHC 
SEQUENCE & 


TRACE SECTOR 
START 14 14 
PRESENT BLOCK & 13 i 
END 13 ra 
NUMBER OF BLOCKS 3 


DISK ERROR AT PROGRAM LINE Sai 
ERROR ME: 


READ ERROR 13. & 


READ. 
Figure 7. Recovered Disk Sequence 
This is what you may see if you try to recover files from a 


part of the disk where no files have been written. Simply 
type GOTO 1000 to continue. 


® GOTO4BB 

5 PRINT"RUN":LIST599-525 

19 INPUT"SAVE ON DRIVE #";A:AS="DISK 3 
aFILE RCVRY": IFA<>SANDA<>1GOTO19 

11 BS=STRS$(A)+":"+A$:OPEN15,8,15,"S"+BS$: 
aCLOSE15:PRINTAS$" SCRATCHED 

12 SAVEB$,8:VERIFYB$,8:PRINTAS" SAVED 7 
7AND VERIFIED": END 

ADD REM FERRER KK EKA KE KER AKK KEE KK KKREE 

461 REM * 

462 REM * DISK FILE RETRIEVER 

403 REM * 

464 REM * 

405 REM * 

425 REM BRR RK RRR KK KKK KEKE EK EKER KKEEEE 


427 REM * PUT DISK WITH LOST FILES 
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REM * INTO DRIVE 1. THIS PROGRAM 
REM * WILL THEN SEARCH FOR FILES 
REM * IN TRACKS 17-1 & 19-35 AND 
REM * RETURN THE START BLOCK, END 
REM * BLOCK, AND NUMBER OF BLOCKS. 
REM * THE FIRST 256 BYTES OF ANY 
REM * FILE MAY BE EXAMINED TO 

REM * ALLOW IDENTIFACATION. 

REM * ANY IDENTIFIED FILE CAN BE 
REM * COPIED ONTO DRIVE 9. 

REM RK RKAA KEKE RK KKK KEE RK KKK KEKE REE 
REM * USAGE: DRIVES: 

REM * DRIVE 9: GOOD DISK 

REM * DRIVE 1: DAMAGED DISK 
REM * LOGICAL FILES: 

REM * 1: WRITE FROM KEYBOARD 
REM * 8: READ FROM DISK 

REM * 9: WRITE TO DISK 

REM * 15: DISK CONTROL 

REM * DISK CHANNEL: 2 

REM * DISK BUFFER: #2 (1990-19FF) 
REM 2 RRR RRA KK ERK KKK KKK RRR KERR REE 
REM * PROGRAM ENTRY POINTS 

REM * 18 - SAVE & VERIFY PRGM 
REM * 1999 - PRINT SUMMARY TABLE 
REM * 1160 - CHOICES 

REM 2 RRA A KARR ERK AK KAA KKK KKK ER KE KER 


REM ** 
P(8)=8: 


NUMERICAL VARIABLES 
REM PRESENT TRACK # 
P(1)=@:REM PRESENT SECTOR # 
L(®)=@:REM TRACK LINK 
L(1)=0:REM SECTOR LINK 


SR=17: REM START TRACK (17 OR 19) 
SP=00: REM END TRACK 

SM=20: REM MAX # OF SCTRS IN TRACK 
TR=SR: REM VARIABLE TRACK VALUE 
:M=@1: REM SEQUENCE # 

MM=50: REM MAX # OF SEQUENCES 
:N=68: REM # OF BLOCKS IN SEQ 
PS=60: REM START OF BASIC 

PL=98: REM 1ST LINK POINTER 
PN=00: REM 1ST LINE # 

ES=00: REM ERROR IN SECTOR 

ET=96: REM ERROR IN TRACK 

EL=09: REM DISK ERROR IN LINE # 

3 : REM A,J,K GENERAL VARBLS 
REM ** 


REM ** STRING VARIABLES 
3 :REM A$,Z$ GENERAL VARIABLES 


BS=""_:REM CONT RUN VARIABLE 
FS=""";REM NEW FILE NAME 
TS=""":REM TYPE OF FILE CREATED 
ENS="@6" :REM DISK ERROR # 


EMS=" OK":REM DISK ERROR MESSAGE 
ss=" <<<" :REM STRING UTILITY 
HS="9123456789ABCDEF":REM HEX DGTS 
ZG$="AGOTO5":REM STRING UTILITY 
REM ** 

REM ** MATRIX VARIABLES 
DIMD$(35,29,3):REM BLOCK POINTERS 


: REM * ~* G,1 IN TRK & BLK PNTRS 
: REM * ~* 2,30UT TRK & BLK PNTRS 
REM ~*~ 29-BLOCK NUMBER 
: REM 35- - -TRACK NUMBER 
DIMS$(MM,4):REM SEQUENCE DATA 
REM 6,1 START TRACK & BLOCK 
REM 2 NUMBER OF BLOCKS 
REM 3,4 END TRACK & BLOCK 


Programs for Commodore’s PET® 


Present this ad from COMPUTE! and receive $2 off your purchase 


price. Valid at your local dealer or when ordered direct. 


¢ PROFESSIONAL TOOLS 


Send for ites catalog! 


a 
77 HARRY H. BRILEY 
Vf P.O. Box 2913 
Livermore, CA 94550 
(415) 455-9139 


© Business Researcher.......-... 0.2 +e eee (16k) $50 
® RNAVS Navigator -(16k) $30 (8k) ee 
* Education Pack (High School)........----.6---55 $45 
¢ DISK BOWLING SYSTEM 
® Leagquebowl-24.....:0.e scenes ees (Disk 32k) $445 
* Archivebowl.. .. . : . (for above) $40 
* Leaguebowl-12. . . (Cass. 16k) $40 
* Tournamentbow! . (Cass. 8k) $30 
e HOME & OFFICE 
* Deluxe Address (16k)$40 © Inventory . 
* Home Address... .. $25 © Shopper . 
* Grocery Mart. ...... $415 ® Dinner's On!. 
¢ GAMES & SIMULATIONS 
* Mansion! .. . ° Fur Uae 
* Museum! * High Seas. 
© Pentagon! . 


Dealers: Letterhead inquiries invited, Photocopies of this ad are NOT valid coupons. One 
coupon per purchase. This coupon may be redeemed for face value plus 15¢ for handling 


where restricted by low 


UNDERSTANDING YOUR PET/CBM 
Volume |: Basic Programming 


New 248-page book includes all the former TIS workbooks 
except “PET Graphics.” Provides information for both ROMs and 
a comprehensive index. Only $14.95. 


Also from TIS 
WB-3 PET Graphics $4.95 


floppy disk with complete instruction 
$29.95 (diskette) 


ist system 
CHECKBOOK tecord 
p track of who ow 


you how much 


MEDIT cre 
SW-5 CALENDAR aj 


TIS 
P.O. Box 921, Dept. C 
Los Alamos, NM 87544 


PET and CBM a 


Add $2 ($5 foreign orders) 
shipping and handling 


if it was received from customer upon purchase of one of the above programs. Offer void 


—— | 
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596 REM ** 672 PRINT"VTHIS SEARCH CAN RUN CONTINUOU 
595 OPEN15,8,15:EL=595:GOSUB5100 aSLY, BE 
6099 REM ** PAGE 1/INTRODUCTION, TRACKS 674 PRINT"HALTED AFTER EACH OPERATION, 
665 OPEN1,@:PRINTZG$:PRINTTAB (9) "¥¥rDISK = HAVE A 
3 RECOVERY PROGRAM 676 PRINT"PAUSE AFTER EACH OPERATION, 
610 PRINT"¥¥ PUT DISK FOR RECOVERY IN 7 - OR BE ENDED 
3 xDRIVEf rl 678 PRINT"WITH A JUMP TO THE SUMMARY. 
615 PRINT"¥¥¥ HIT ANY KEY WHEN xDISKf 1 689 PRINT"Vy TYPE rCf FOR CONTINUOUS 
3IS IN PLACE. 3 RUNNING 
626 PRINT"Y (DISK WILL THEN BE 7 682 PRINT" TYPE rHf FOR HALT IN 7 
saINITIALIZED) ":GOSUB4969 nOPERATION 
625 PRINT#15,"I1":EL=625:GOSUB5109 684 PRINT" TYPE rPf FOR PAUSES IN 7 
630 PRINT"V¥WY START: TRACK rl17f (DOWN) 7 3OPERATION 
3OR rl19f (UP)? rl7f<<r";:INPUT#1, 686 PRINT" TYPE rSf TO ESCAPE TO 7 
3SR: PRINT aASUMMARY 
635 IFSR<>17ANDSR<>19THENPRINT"TTTT": 688 PRINT"VYOPERATIONAL MODE MAY BE - 
3GOTO639 3CHANGED DURING 
640 PRINTTAB(7)"V¥END SEARCH AT TRACK: 690 PRINT"THE SEARCH BY TYPING THE 7 
a <<<<r";:INPUT#1,SP:PRINT aABOVE COMMANDS AT ANY TIME. 
645 IFSR=17THENIFSP<10RSP>16THENPRINT"TT 692 GOSUB4900:BS=A$ 
aT" :GOTO648 694 PRINTZG$: POKE59468,12:TR=SR:M=1 
650 IFSR=19THENIFSP<2GORSP>35THENPRINT"T 696 OPEN8,8,2,"#2":EL=695:GOSUB51990 
aTT":GOTO646 709 REM ** FIND INITIATOR BLOCKS 
655 CLOSE1:FORJ=6TO1006:NEXT 705 P(0)=TR:GOSUB5019:REM @ GET NUMBER - 
660 REM ** PAGE 2/DESCRIPTION 3OF BLOCKS IN TRACK TR 
662 POKE59468,14:PRINTZG$: PRINT"VTRACKS" 710 FORK=9TOSM:P(1)=K:REM @ SEARCH TRK 
3SR"TO"SP"WILL NOW BE SEARCHED FOR 715 :IFD%(P(9),P(1),2)<>8GOTO735 
664 PRINT"h¥V¥VFILES. THE INITIAL AND 7 726 :GOSUB5626:REM @ GET LNKS/OUT PTRS 
3ENDING BLOCKS 725 :IFL(@)=OTHENDS (P(0),P(1),2)=64: 
666 PRINT"AND THE LENGTH OF EACH 7 3GOTO735 :REM @ END OF FILE FOUND 
ARECOVERED FILE 730 :GOSUB5046:REM @ IN PTRS TO NXT BLK 
668 PRINT"ARE RECORDED. (TRACK - 735 NEXT 
aSUMMARIES ARE 749 GOSUB4969:REM @ TRK TABLE 
670 PRINT"ALSO DISPLAYED). 745 REM ** FOLLOW LINKS FOR EACH START 


PET/CBM* 


TEEE-488 TO PARALLEL PRINTERS 


THE P.I.E.-C IS COMPATIBLE WITH 
Centronics, NEC "Spinwriter", Escon Products, AJ-841, 


IDS "Paper Tigers", Anadex, "MIPLOT" by Watanabe, etc. 
* Ok OK OX * ke OK OK * Ok OK 
Fully assembled and attractively enclased. Connected 
with, and powered by, the printer using the 6' data 
cable. Independently addressable as Device# 4 to 30. 
IEEE-488 Bus Extension for floppy disks, etc. Switch i 
selectable PET-TO-ASCII code conversion. No software rd 
drivers required -- Uses BASIC 488 commands instead. | 
a a * Ok OK OX ee ae 


ORDER TODAY -- ONLY $119.95 (+$5 S&H) (Md. Res. +TAX) || 
Specify printer model plus PET model and ROM level 


LeData Propucts (301) 730-3257 | 
P.O. Box 1080, CoLumBia, Mp. 21044 


*PET/CBM are trademarks of Commodore Business Machines ) 


G2 = ry == cg 
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750 P(9)=TR 


755 FORK=OTOSM: P(1)=K:N=1 IEEE-488 BUS 


768 :IFD%(P(9),P(1) ,9) <>@GOTO835 


765 +:S%(M,@)=P(G) :S3(M,1)=P(1) SYSTEM BUILDING BLOCKS 


For Commodore PET/CBM and other computers... 


770 :GOSUB4910:REM @ PRINT DISPLAY 

775 :PRINT"T"TAB(14)SS$N,SS$P(0),S$P(1) 

788 :GOSUB5826:REM @ GET LINKS 

785 :IFL(9)=0THEND$ (P(9) ,P(1),2)=64: 
aGOTO885 

796 :GOSUB5946:REM @ IN PTRS TO LNK BLK 

795 :P(G)=L(G) :P(1)=L(1) :N=N+1 

868 :GOTO775 

805 :REM @ CLOSE END OF LNK SEQUENCE 


819 :S%(M,2)=N:S%(M,3)=P(9) \ = TNW-2000 
815 :S%(M,4)=P(1) 
820 :GOSUB4920:REM @ COMPLETE DISPLAY TNW-1000 serial interface: $129 
825 :IFBS="S"THENK=SM 1 channo! output onty 
830 :M=M+1:P(G)=TR:REM @ RESET , 
835 NEXT aid je BEES TNW-2000 serial interface: $229 
846 IFBS="S"GOTO1GG5 Ba ae i niny 
845 eg aed @ GO = TNW-232D Dual Serial Interface: $369 
a hannels input and output plus RS-232 control lines 
850 REM @ TEST FOR END TRACK 
855 IFSR=17ANDTR<SPGOTO1556 TNW-103 Telephone Modem: $389 
860 IFSR=19ANDTR>SPGOTO1600 Anblanawapiatiolgel] Use wit AA 
865 GOTO7B9 SOFTWARE ™™: 
1999 REM ** PRINT OUT SUMMARY swap: 
19665 K=6:BS="H" PLUS ular COMPLIES. pay 
1019 PRINTZG$;:PRINTTAB(11)"¥rFILE 7 NW-103 
=SUMMARY" \ Write or call for information today: 
1015 PRINT"V¥xrSEQ #","BLOCKS"," START ", L i TNW Corporation 
a" FINISH CORPORATIO: 3351 Hancock Street 


San Dlego CA 92110 


" nom 8 
1629 PRINT,,"TR SEC","TR SEC (714) 225-1040 


1925 FORJ=1+15*KTO15+15*K 
1030 :IFJ>M-1THENJ=15+15*K:GOTO1045 
1935 :GOSUB4G40:REM @ FORMAT NUMBERS 
1040 :PRINT" "J," "S%(J,2),AS,Z$ 
1645 NEXT 
1050 K=K+1:PRINT"¥":GOSUB4930 
1955 IFJ<MGOTO1919 
1160 REM ** CHOICES 
1165 PRINTZG$:PRINT"VV¥xCHOICESE: 

a xLfOOK: FIRST 249 BYTES 
1119 PRINTTAB(12) "¥xSfUMMARY REVIEW 
1115 PRINTTAB(12)"¥xRPETRIEVE A FILE 
1126 PRINTTAB(12)"¥xBf SCAN OTHER BAND 
1125 PRINTTAB(12)"v¥x"f DIFFERENT DISK 
1136 PRINTTAB(12)"¥rEfXIT PROGRAM 
1135 GOSUB4960: IFAS="L"GOTO1206 
1149 IFAS="S"GOTO1980 
1145 IFAS="R"GOTO1596 
1156 IFAS$="B"THENCLOSE8 :GOTO609 
1155 IFAS="*"THENGOSUB4059 : RUN496 «gjeheing ys compleat 
1166 IFAS="E"THENGOSUB4059: PRINTZG$: END See Ee cree geribet 
1165 GOTO1135 
1200 REM ** GET 1ST PAGE OF FILE DATA 
1205 INPUT"¥¥VINPUT TRACK, SECTOR";J,K 
1219 IFJ>350RJ<1GOTO1196 
1215 P(@)=J3:GOSUB5919: IFK<@ORK>SMGOTO119 


al) 
1226 P(1)=K:GOSUB5820:REM @ LNKS L(9) 7 
aL (1) 


1225 A=2:GOSUB50970:REM @ READ NEXT 3 
aBYTES (SET BP) 

1238 GOSUB5950:PS=A:REM @ START BASIC 

1235 GOSUB5959:PL=A:REM @ 1ST PROG LINK 

1248 GOSUB5050:PN=A:REM @ 1ST LINE # Skyles Electric Works 


1245 A=2:GOSUB5970:REM @ GET STRING 231 E South Whisman Road 
Mountain View, CA 94041 
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125@ 25="" 1580 PRINT"¥rIS EVERYTHING OKf? TYPE <7 
1255 FORJ=9T0259 3'C' TO GO! 
1269 :GET#8,A$:GOSUB5960:ZS=ZS+AS$ 1585 PRINT" (ANY OTHER LETTER WILL 7 
1265 NEXT 7ABORT) ¥":GOSUB4989 
1278 ZS$=CHR$(L(6))+CHRS$(L(1))+2$ 1590 IFAS$<>"C"GOTO1196 
1275 PRINTZG$TAB(12)"cFIRST PAGE DATA": 1595 REM ** RETRIEVE PROGRAM 
3REM @ PRINT DATA 1660 OPEN9,8,4,"0:"+FS$+","+TS+",WRITE": 
1286 PRINT,,"¥xTRACK", "SECTOR 3EL=1609 :GOSUB5109 
1285 PRINT"INITIAL BLOCK",P(9) ,P(1) 1665 EL=1555:GOSUB5196 
1296 PRINTTAB(15) "rBYTES 1619 PRINT"COPYING TRACK:"P(0)TAB(21) "SE 
1295 PRINT"BLOCK POINTER"TAB(16) "0&1", 3CTOR: "P(1) 
aL (9) ,L(1) 1615 GOSUB5620:P(0)=L(9):P(1)=L(1): 
1360 PRINTTAB(29)"xDECIMAL VALUE aREM @ GET LINKS 
1305 PRINT"PRGRM START"TAB(16)"2&3"TAB(2 1620 A=255:IFP(0)=9THENA=P(1) 
33) PS 1625 FORJ=2TOA 
1319 PRINT"1ST LINK"TAB(16) "4&5"TAB(23)P 1636 :PRINT#15,"M-R";CHRS$(J) ;CHRS$(19) 
aE 1635 :GET#15,A$:GOSUB5969 
1315 PRINT"1ST LINE #"TAB(16) "6&7"TAB(23 1640 :PRINT#9,AS; 
3) PN 1645 NEXT: EL=1579 
1326 PRINT"LHEX VALUES 1659 IFP(0)<>8GOTO1619:REM @ GET NEXT 5 
1325 FORJ=6T05 3aBLOCK 
1339 :A=8*J:GOSUB5080:PRINT" "AS" : "; 1655 CLOSE9:PRINT"VrFILE RECOVEREDY": 
1335 :FORK=6TO7 3GOSUB4939:GOTO1199 
1340 ::A=ASC(MIDS(Z$,8*J+K+1,1)) 4060 REM ** GET AND HOLD 
1345 ::GOSUB5080:PRINTAS" "; 4001 FORA=9TO19:GETAS:NEXT 
1350 :NEXT:PRINT 4902 GETAS: IFAS=""GOTO4992 
1355 NEXT 4903 REM @ SCREEN DUMP: IFAS="P"THENGOSUB 
1369 PRINT"¥xCHARACTER VALUES:¥" 3'SCREEN DUMP! 
1365 K=O 4905 A=VAL(AS) 
1376 FORJ=1T089 4969 RETURN 
1375 :A=ASC(MID$(Z$,J+89*K,1)) 4919 REM ** PRINT DISPLAY OF RECOVERED 
1380 :GOSUB5099 aSEQUENCES 
1385 NEXT 4611 PRINTZGS$:PRINTTAB(7)"VRECOVERED 3 
1399 PRINT"WY 'C' TO CONTINUE: +/- 3 aDISK SEQUENCES 
CHANGE LINE SCAN" 4012 PRINTTAB(12) "YSEQUENCE"M 
1395 GOSUB4800:IFAS="C"GOTO1190 4613 PRINT,,"VTRACK", "SECTOR": PRINT"¥rST 
1466 IFAS="+"ANDK<2THENPRINT"TTTT";: ART", ,S%(M,8) ,S%(M,1) 
aK=K+1:GOTO1376 4914 PRINT"VPRESENT BLOCK": RETURN 
1405 IFAS="-"ANDK>OTHENPRINT"TTTT";: 4620 REM ** BOTTOM OF DISPLAY 
3K=K-1:G0OT01379 4621 PRINT"VrEND",,S%(M,3) ,S%(M,4) 
1416 GOTO1395 4922 PRINT"VNUMBER OF BLOCKS",S%(M,2) 
1566 REM ** RETRIEVE A FILE 4923 PRINT"Vy (C-CONT P-PAUSE H-HALT -~ 
15905 INPUT"V¥VSTARTING TRACK, SECTOR";J, 3S- SUMMARY) 
aK 4924 GOSUB467G:RETURN 
1516 IFJ>350RJ<1GOTO1199 4630 REM ** TYPE ANY KEY--- 
1515 P(@)=J3:P(1)=K:GOSUB5019: IFK<GORK>SM 4031 PRINTTAB(7)"TYPE ANY KEY TO 3 
3GOTO1198 aCONTINUE" : GOSUB4899 : RETURN 
1520 PRINTZGSSPC(19) "FILE RETRIVAL 4040 REM ** FORMAT NUMBERS 
1525 PRINT"VVRETRIEVING THE FILE - 4641 AS="r"+RIGHTS (STRS$(S%(J,0)), 
aSTARTING AT:" n2)+" "+RIGHTS (STRS(S$(J,1)), 
1536 PRINTTAB(3)"TRACK r"P(G) "£"TAB(2G)" 32) 4+"F 
“SECTOR r"P(1) 4042 ZS=RIGHTS(STRS(S%(J,3)),2)+" a 
1535 PRINT"YNAME FOR RETRIEVED FI<y¥*TTL a"+RIGHTS (STRS$(S%(J,4)) ,2) 
3E:": INPUT" "ZFS 4043 RETURN 
1549 PRINT"VIS THIS A rPfROGRAM OR A 5 4956 REM ** CLOSE FILES 
arSfEQUENTIAL FILE" 4051 PRINT#15,"B-P,2,0":CLOSE8:CLOSE15: 
1545 GOSUB4600:IFAS="P"THENTS="PRG": aRETURN 
aPRINT" y,PROGRAM":GOTO156B 4060 REM ** PRINT TRACK SUMMARY TABLE 
1550 IFAS="S"THENTS="SEQ": PRINT" 4961 PRINTZG$:PRINTTAB(8) "TRACK - 
ar SEQUENTIAL" :GOTO1569 ac"TR"fSUMMARY TABLE 
1555 GOTO1545 4062 PRINT"SEC ! TR yINf sc 1 TR a 
1569 PRINT"¥PUT GOOD DISK WITH SUFFICIEN - cOUTf sc 
aT BLOCKS IN DRIVE x9 4663 FORJ=9TOSM: PRINTJ; : FORK=9T03 
1565 PRINT"VINITIALIZE? (Y/N) ":GOSUB4909 4064 PRINTTAB(5+9*K)D$(P(),J,K); 
1576 IFAS="Y"THENPRINT#15,"I6":EL=1535: 4065 NEXT: PRINT: PRINT"1"TAB(4)"1"SPC(14) 
3GOSUB5169 a"L":NEXT 
1575 GOSUB4939 4966 GOSUB4679:RETURN 
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REM ** PAUSE/STOP CONTROL 

GETAS: IFAS="H"ORAS="C"ORAS="P"ORAS= 
a"S"THENBS=A$ 
IFBS$="H"THENGOSUB4939 : RETURN 
IFBS$="P"THENFORJ=0T05900:NEXT 

GETAS : IFAS="P"THENGOSUB4 903 : RETURN 
IFAS="H"ORAS="C"ORAS="S"THENBS=A$ 

RETURN 

REM ** NUMBER OF BLOCKS IN TRACK 
SM=16: IFP(@) <31THENSM=17 
IFP(G)<25THENSM=19 

IFP (0) <18THENSM=26 

RETURN 

REM ** GET LNKS--P(@)P(1)IN: 
3L(%)L(1)OUT--OUT PTRS SET 
PRINT#15,"U1:";2;1;P(G) ;P(1) 
EL=5921:GOSUB5169 

FORJ=6TO1:REM @ GET LINKS 

: PRINT#15, "M-R"; CHR$ (J) ;CHR$(19) 
:GET#15 ,A$:GOSUB5668 

:L(J)=ASC(AS$) :D8(P(G),P(1), 
3J+2)=L(J) 

NEXT: A=2 :GOSUB5976 : RETURN 

:REM ** IN POINTERS FOR LINK BLOCK 
: FORJ=9TO1 

::D$(L(8),L(1),J)=P(J) 

: NEXT: RETURN 

REM ** GET DEC VALUE-2 BYTES 

GET#8,A$:GOSUB5960:REM @ LO 

A=ASC (AS) 

GET#8,A$:GOSUB5960:REM @ HI 

A=ASC (AS) *256+A: RETURN 

REM ** WHEN AS="" 
IFAS=""THENAS=CHRS (G) 

RETURN 

REM ** SET B-P 

PRINT#15,"B-P,2,";A 

EL=5971:GOSUB5199 : RETURN 

REM ** DEC>HEX 

AS=MIDS$ (H$,1+(24@ANDA) /16,1)+MIDS$(H 
3$,1+(15ANDA) ,1) :GOSUB5969:RETURN 

REM ** ASC > CHARACTERS 
IFA<32THENPRINT"r"CHRS$(A+64) "£";: 
aRETURN 

IFA=3 40RA=9 8THENPRINTCHRS$ (34) CHR$ (3 
34) CHR$ (26) ; : RETURN 
IFA<128GOT05695 
IFA<169THENPRINT"r"CHR$(A+32)"fF"3: 
RETURN 

PRINTCHRS (A) ; : RETURN 

REM ** CHECK DISK ERROR 

INPUT#15, EN$,EM$,ET,ES: IFENS="90"TH 
aENRETURN 

PRINT"V¥¥rDISK ERRORf AT PROGRAM 
aLINE "EL 
PRINT"VERROR MESSAGE: 
=ET"; "ES 
IFENS="22"GOTO1909 
END 


"ENS" "EMS, 


© 


HESLISTER: 


MORE SOFTWARE TOOLS 
FROM HES FOR YOUR 8K pet. 
by Jay Balakrishnan = 


HESEDIT: change 22 lines of data by merely over- 
typing and insert, delete, and even duplicate lines- 
all at once! Scroll forwards or backwards by any 
amount — it's also easy to edit files bigger than your 
memory. Why code a program to maintain each file? 
Use HESEDIT for mailing lists, notes or prepare 
assembler source for HESBAL. All keys repeat. FAST - 
written in BASIC and assembler. ONLY $12.95 
6502 ASSEMBLER PACKAGE: HESBAL, a full-featured 
assembler with over 1200 bytes free (8K) & HESEDIT; 
for less than $25! HESBAL is THE best 8K assembler 
available: it uses only 1 tape or disk, yet includes 


variable symbol sizes, pseudo-opcodes, over 25 error 


messages and more than 70 pages of documentation. 
ONLY $23.95 


formats multi-statement line BASIC 
programs, shows logic structure (disk reqd.) $9.95 


GUARANTEED to load or replaced FREE 
Order from your dealer or direct from us 
Plus $1.50 Postage (our doc. is heavy!) 
Disk - Add $3 . Calif Res. - 6% Sales Tax 
Dept C 3° Human Engineered Software 
3748 Inglewood Blvd. Room 11 
Los Angeles, California 90066 


Sas 24 HOURS — (213) 398-7259 2 


Dealer inquiries welcomed 


CBM/PET Computers & Such! 


Features for Mar/Apr 81: 


Micro Software Systems 
Billboard for 8032 $ 39 
Billboard for 2001 $ 29 

Cursor Magazine (on tape, 
specify issues. Write 

10/$44.95 


NEC Spinwriter #5 
Xymec typewriter/printer $2499 

737, PET i/f $§ 899 
PET i/f $ 599 
Watanabe MIPLOT $1149 

(for new 2001) $ 15 

tte drive with 16/32k CBM 


CALL FOR CURRENT 
PRICES ON CBM/PET 
EQUIPMENT 


CONNECT PET/CBM TO PRINTER: Simply plug into the interface 
and use your PET/CBM computer with popular “standard 
printers, or add a video monitor for a second display. All 
interfaces are assembled, tested, and waranteed. No software 


is required. 


Xymec, or other industry 


-65C Use NEC, Centronics, t 
aay d Works with disk, other IEEE 


standard parallel printers. 
devices attached. $129.95 
TU-6514 Use RS-232 (serial) printers, like Heathkit H-14. 
300 to 4800 baud (please specify rate desired). 
Includes power pack. $79.95 4 
TU-PVE Connect your Video Monitor to PET/CBM for second 
display. Our unique contact extensions leave the user 
port available for connection of other accessories. 
$39.95 (NOT for 8016/32) 
ESCON Interfaces: 
SELECTRIC to PET/CBM 
e, Atari, TRS-80: Parallel 
e| Atari, TRS-80: RS-232 Serial 
to Parallel 
+ $20 to $90. 


$649 
$549 
$579 
$425 
$100 


Installation 


VISA/MC, VA +4% 
Factory auth 

sales & service 
MWF 12-8,Sa 9-3 


Virginia Micro Systems 
14415 Jefferson Davis Highway 


Woodbridge, Virginia. 22191 (703) 491-6502 
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Get Fireworks From 


<-“Your PET 


* 


TREK-X 

TREK-X Command the Enterprise as you 
scour the quadrant for enemy warships. 
This package not only has superb graph- 
ics, but also includes programming for 
optional sound effects. A one-player 
game for the PET 8K. Order No. 0032P 
$7.95. 


DUNGEON OF DEATH 


DUNGEON OF DEATH Battle evil 
demons, cast magic spells, and accumu- 
late great wealth as you search for the 
Holy Grail. You'll have to descend into 
the Dungeon of Death and grope through 
the suffocating darkness. If you survive, 
glory and treasure are yours. For the PET 
8K. Order No. 0064P $7.95. 


ARCADE | 


ARCADE | This package combines an ex- 
citing outdoor sport with one of 
America’s most popular indoor sports: 
¢Kite Fight — It's a national sport in India. 
After you and a friend have spent several 
hours maneuvering your kites across the 
screen of your PET, you'll know why! 
°Pinball—By far the finest use of the 
PET’s exceptional graphics capabilities 
we've ever seen, and a heck of a lot of fun 
to boot. 

Requires an 8K PET. Order No. 0074P 
$7.95. 


Instant Soffware’ 


ld). 


Lan © 


CODE NAME: CIPHER 


CODE NAME:CIPHER 

Enjoy that same feeling of intrigue and 
discovery with the Code Name: Cipher 
package. Included are: 
*Memory Game—Would you like to 
match your memory against the com- 
puter’s? You can with the Memory Game. 
eCodemaster—One player types in a 
word, phrase, or sentence, and the PET 
translates that message into a crypto- 
gram. The other player must break the 
code and solve the cryptogram in the 
shortest time possible. 
*Deceitful Mindmaster—This isn't your 
ordinary Mastermind-type game. You 
must guess the five letters in the hidden 
code word. 
*Code Breaker—Cracking this code 
won't be as easy as cracking walnuts. 
You'll need to flex your mental muscles 
to win this game. 

If you want a mental challenge, then 
Code Name: Cipher is for you. For the 8K 
PET. Order No. 0112P. $7.95. 


*A trademark of Commodore Business Machines 


PETERBOROUGH, N.H. 03458 
603-924-7296 
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Captivate Yourself. 


SANTA PARAVIA AND FIUMACCIO 
Become the ruler of a medieval city-state 


as you Struggle to create a kingdom. Up 
to six players can compete to see who 
will become the King or Queen first. This 
program requires a PET 16K. Order No. 
0175P.$9.95. 


CHIMERA 


CHIMERA If you think the legendary 
Chimera was hard to handle, wait until 
you try the Chimera package. Included 
are: 

*Reflex—Round and round the little 
white ball rolls. Only fast reflexes can 
guide it into the center of the maze. 
*Dragon—You'll have to shoot down 
those pesky, fire-breathing dragons with 
your cannon. If you succeed your castle 
will be safe, if not it will mean a call to 
your fire insurance company. For one 
player. 

e*Dungeon—A very punctual guard 
comes down to the dungeon every day to 
torture you. This means that you have on- 
ly thirty seconds to dig your way under 
the castle to freedom. For one player. 
*Dragon Hunt—You must go forth and 
slay a fire-breathing dragon. The only 
thing that will protect you from the 
flames is your shield, if you know when to 
use it. For one player. 

*Dropoff—You must make your oppo- 
nent's men “dropoff” the board by mov- 
ing and firing your own men. For one or 
two players. Order No. 0110P. $9.95. 


TO ORDER 


SEE YOUR LOCAL 
INSTANT SOFTWARE 
DEALER 


PET DEMO | 


PET DEMO | You can give yourself, your 
family, and your friends hours of fun and 
excitement with this gem of a package. 
*Slot Machine—You won't be able to 
resist the enticing messages from this 
computerized one-armed bandit. 
eChase—You must find the black piece 
as you search through the ever-changing 
maze. 

*Flying Pheasant—Try to shoot the fly- 
ing pheasant on the wing. 

Sitting Ducks — Try to get your archer to 
shoot as many ducks as possible for a 
high score. 

*Craps—It’s Snake Eyes, Little Joe, or 
Boxcars as you roll the dice and try to 
make your point. 

eGran Prix 2001—Drivers with experi- 
ence ranging from novice to professional 
will enjoy this multi-leveled race game. 
eFox and Hounds —It's you against the 
computer as your four hounds try to cap- 
ture the computer's fox. 

For true excitement, you'll need a PET 
8K. Order No. 0035P $7.95. 


rr, Toll-Free 


ate 800-258-5473 


Instant een 


Santa Paravia 
and Fiumaccio 


The most captivating 
and engrossing pro- 
gram ever made for 
the PET* 


It is the dawn of the 15th Century; 
you rule a tiny Italian city-state. Your 
goal: The Crown! 

Up to six players can compete as 
rulers of neighboring cities. You con- 
trol the grain harvest, feed your serfs, 
set tax rates, dispense justice and in- 
vest in public works. 

The future of your realm will de- 
pend on your decisions. If they are 
wise, your city-state will grow and 
you will acquire loftier titles. If your 
rule is incompetent, your people will 
starve and you may be invaded by 
your neighbors. 

How will you rule your kingdom? 
Will you be an enlightened leader—or 
an unscrupulous despot? Only you 
can answer that question—with San- 
ta Paravia and Fiumaccio. 


DOW JONES 


DOW JONES Up to six gi..yers can enjoy 
this exciting stock market game. You can 
buy and sell stock in response to chang- 
ing market conditions. Get a taste of 
what playing the market is all about. Re- 
quires a PET with 8K. Order No. 0026P 
$7.95. 


wre Guarantee XN 


Ge R PROGRAMS ARE GUARANTE Boe D 
TO BE QUALITY PRODUCTS. IF NOT 
COMPLETELY SATISFIED YOU MAY 
RETURN THE PROGRAM WITHIN 60 
DAYS. A CREDIT OR REPLACEMENT 
WILL BE WILLINGLY GIVEN FOR 
ANY REASON. 


AVAVADN 


Prices subject to change without notice. 


* A trademark of Commodore Business Machines 


PETERBOROUGH, N.H. 03458 
603-924-7296 
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Pet Exec 
Hello 


Gordon Campbell 
Toronto, Canada 


When you turn on your Pet, what 
do you do next? I found that there 
was a standard set of commands, 
which went along with the par- 
ticular diskette being used. For ex- 
ample, for program development, 
the commands I use are: 

POKE 59468, 14 (set upper and 

lower case) 

POKE 59458, 62 (this may damage 

YOUR machine) 

OPEN 1,8,15,‘‘10’’ (because DOS 

is first) 

LOAD ‘‘BASIC AID’’, 8 (extensions 

to BASIC 

SYS 7*4096 (invoke BASIC AID) 

DISK ‘‘$0’’ (directory) 

REPEAT (turn on auto-repeat 

keyboard) 

Eventually, you get tired of is- 
suing the same old commands over 
and over. So I did something about 
it. PET EXEC HELLO is a suite 
of three small programs which 
allow you to use a ‘HELLO’ file 
on disk. 

The HELLO file consists of a 
set of direct commands which are 
executed when you ‘boot’ from the 
disk. The first file on the disk must 
be the SIGNON program. It prints 
a greeting, and invokes a machine- 
language program called EXEC 
HELLO. EXEC HELLO reads in 
the whole HELLO file, and feeds it 
to the keyboard buffer one 
character at a time. At the end of 
the commands, EXEC HELLO 
disengages. BUILD HELLO is a 
program which helps you create 
HELLO files. 


SIGNON - NOV 26, 1980 PAGE 1 

100 IF PEEK (13) THEN 160 

110 PRINT "QQQpet ‘exec hello' in operation 
120 PRINT "Q for upgrade rom - 32k disk 
130 PRINT "QQ 

140 POKE 13,1 

150 LOAD "exec hello",8 

160 POKE 13,0 


170 SYS 6 * 16 T 3 +4 * 256 
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6400- 


6403- 
6406- 
6409- 
640C- 
640F- 
6412- 
6415- 


6417- 
6419- 
641C- 
641E- 
641F- 


6421- 


642u- f 


6426- 
6428- 
642A- 
642C- 
642E- 
6430- 
6432- 
6434- 
6436- 
6438- 


643B- 
643D- 
643F- 
6441- 
6443- 
6445- 
6448- 
644A- 
644C- 
644E- 
6450- 
6452- 
6454- 
6456- 


6459- 


645C- 
645E- 
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uC 
2c 
Be 
00 
00 
00 


64 


65 


F5 


65 


FS 
64 


65 


PET EXEC-HELLO 
FOR "UPGRADE (3.0) ROM! 


AS OF NOV 26, 1980 
SAVED AS 'PEH ML V5! 
COPYRIGHT (C) 1980 


BY GORDON CAMPBELL 
36 DOUBLETREE ROAD 
WILLOWDALE, ONTARIO 
M2J 324 
PHONE (416) 492-9518 


PERMISSION TO MODIFY OR COPY FOR 
NON-COMMERCIAL PURPOSES IS HEREBY 
GRANTED, PROVIDED THAT THE COPYRIGHT 
AND THIS NOTICE IS RETAINED. 


THIS PROGRAM IS INVOKED BY THE BASIC 
PROGRAM 'SIGNON'. IT RUNS IN UNPROTECTED 
MEMORY BY DESIGN, SO IT SHOULD BE 
INVISIBLE TO OTHER OPERATIONS. ANY REALLY 
BIG PROGRAM WILL SMEAR IT. ANYTHING 
WHICH USES INTERRUPTS (EG. AUTO REPEAT 
KEYBOARD) WILL EITHER COME TO GRIEF 

OR SIMPLY DISENGAGE IT. THATS OK IF 

IT'S THE LAST COMMAND. 


THE EXCEPTION IS 'LOAD', WHICH I WATCH 
FOR. IF THERE IS A LOAD, I GENERATE 
A 'SYS 0' TO RE-ENGAGE. 


TRY TO AVOID DOS COMMANDS WHICH MAY 
CAUSE TROUBLE. FOR EXAMPLE, USE: 


LOAD"$0", 8 
LIST 
NEW RATHER THAN >$0 
-BA $6400 
-0S 
: JUMP ENTRY 3SKIP AROUND FILENAME 
3 
FNAME -BY 'HELLO,P,R' 0 0 0 


-BYOO0000000 


ENTRY 


LDX #0 
SHLOOP LDA FNAME,X ; FIND LENGTH 
BEQ LENFND  ; OF FILENAME 
INX 
BNE SHLOOP ; JUMP 
; 
LENFND STX FNLEN 
LDA #$0F ; OPEN 
STA *FNUM 3 CONTROL 
LDA #8 : 
STA *DEV ; CHANNEL 
LDA #$0F 3 15,8, 15 
ORA #360 
STA *SCNDRY 
LDA #0 
STA *OPLEN 3; NO FILENAME 
STA *ST 
JSR OPEN 3; ROM ROUTINE 
i 
LDA #8 ; OPEN 
STA *FNUM } TEXT 
STA *DEV ; FILE 
ORA #$60 ; 8,8,8 
STA #SCNDRY 
LDA FNLEN LENGTH OF 
STA *OPLEN  ; FILE NAME 
LDA #H, FNAME 
STA ¥FNPTR+1 ; AND IT'S 
LDA #L, FNAME ; ADDRESS 
STA *FNPTR 
LDA #0 
STA *ST 
JSR OPEN 3; ROM ROUTINE 
i 
JSR ERRCHK 
; 
LDA #2 } SKIP PAST 
STA NCHRS LOAD-ADDRESS 
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Professional Business Software 


For The Commodore 32K Microcomputer System 
With 2040 Dual Drive Disk & 2022 Tractor Feed Printer 


Genena Leporn 
SELECTION MENU 


General Ledger 


e Holds Up To 300 Accounts 


e Accepts Up To 3000 
Transactions Per Month. 

e Cash Disbursements Journal, 
Cash Receipts Journal, and 
Petty Cash Journal for 
simplified data entry. 

e Maintains Account Balances 
For Present Month, Present 
Quarter, Present Year, Three 
Previous Quarters, And 
Previous Year 


e Complete Financial Reports 
Including Trial Balance, 
Balance Sheet, Profit & Loss 
Statement, Cash Receipts 
Journal, Cash Disbursements 
Journal, Petty Cash Journal 
and more 

© Accepts Postings From 
External Sources Such As 
Accounts Payable, Accounts 
Receivable, Payroll, 

Etc 


Accounts Payable 


Interactive Data Entry With 
Verified Input And Complete 
Operator Prompting 


Automatic Application Of 
Credit And Debit Memos 


Maintains Complete Purchase 
Records For Up To 200 
Vendors 


Invoice File Accepts Up To 
400 Invoices. 


Random Access File 
Organization Allows Fast 
Individual Record Updating 


Multiple Reports Provide A 
Complete Audit Trail 


Check Printing With Full 
Invoice Detail 


e Full Invoice Aging 
e Automatic Posting To 


General Ledger 


4) Trarasetion Entry 
1) Treneacton Print 
13) Treneaction FM 


Accounts Receivable 


Maintains Invoice File For Up 
To 300 Invoices. 


Accomodates Full Or Partial 
Invoice Payments 


Customer File Maintains 
Purchase Information For Up 
To 1000 Customers. 


Allows For Automatic 
Progress Billing 


Provides For Credit And Debit 
Memos As Well As Invoices. 


Prints Individualized 
Customer Statements 


Interactive Data Entry With 
FullOperator Prompting 


Complete Data Input 
Verification And Formating 


Automatic Posting To 
General Ledger 


419) Geraret information Fae 


Payroll 


e Maintains Monthly, Quarterly, 
And Yearly Cumulative Totals 
For Each Employee 


e Payroll Check Printing With 
Full Deduction And Pay Detail 


© Sixteen Different Reports 
Including W2 And 941 


© Interactive Data Entry With 
Easy Correction Of Entry 
Errors. 


e Automatic Data Verification 


Complete Job Costing Option 
With Cumulative Totals And 
Overhead Calculations 


e Random Access File 
Organization For Fast 
Updating Of Individual 
Records 

e Automatic Posting To 
General Ledger 


Structured around the time tested and reliability proven 
series of business software systems developed by Osbome 
and Associates, these programs have been designed to fill 
the need of a comprehensive accounting package for the 
new Commodore PET micro computer system. Each program 
can either stand alone, or be integrated with the others in a 
total software system. 

Designed with the first time user in mind, these programs 
lead the operator through step by step, verified data entry. It 
is impossible to ‘crash’ a program due to operator error or 
invalid data input. Design consistency has been maintained 
from program to program to greatly increase operator 
familiarity and confidence 

Documentation, normally a problem for small systems 
users, is provided by the comprehensive series of Osborne 


and Associates user manuals. These three manuals together 
total over 800 pages of detailed step by step instructions 
written at three levels for DP Department Managers, Data 
Entry Operators, and Programmers. You don't have to worry 
about getting ‘promises’ instead of documentation because 
the documentation was written before the programs 
were developed. A second set of manuals details any 
changes required during conversion. Each program 
provided on disk with complete documentation. Packaged 
in a handsome three ring binder with pockets and twelve 
monthly dividers for convenient storage of reports 


See your nearest Commodore dealer for a demonstra- 
tion of this outstanding business software system. 


CMS Software Systems 


5115 MENEFEE DRIVE e DALLAS. TX75227 © 214-381-0690 
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Program Operation 6461- A2 08 0860 LDX #8 3 SET INPUT C 
2 6463- 20 C6 FF 0870 JSR SETIN } FOR TEXT FI 
As I said earlier, the first program 6466- 20 E4 FF 0880 PASSJK JSR GET 
on the disk must be SIGNON. orees Ber aaee oa30 Bee ees 
Thus, after turning on the Pet, key 0910 ; eee 
re 646E- AD 78 65 0920 LDA MYPTR ; SET UP FOR 
the following: 6471- 85 01 0930 STA *PTR ; INDIRECT 
CLR 4 spaces ‘*’’,8 Home RUN 6#73- AD 79 65 0940 LDA MYPTR+1 ; ADDRESSING 
: i 6476- 85 02 0950 STA *PTR+1 
This causes the first program on oNiee AD ues 0960 LDY #0 
Pi A- 8C y 
the disk to be loaded and run. « ee ie F ore Ste 
\ i 
Very quickly, you see the com- Supe 20 E4 FF 0990 CHRGET JSR GET 
; 3 480- C9 FC 1000 CMP # ;E ’ FILE C 
mands which were entered earlier 6482- Fe rr 1010 BEQ Sone gOEN DAC SaE DEES EUARE CIEE 
using BUILD HELLO, appear on 6484- AC 7F 65 1020 LDY SvY 
h aie en 6487- 91 01 1030 STA (PTR),Y 
the screen. At the end of the 5489- 88 1040 DEY 
HELLO fi : 4BA~ 8C TF 65 1050 STY SVY 
O file you regain control at Bap” co FF 1060 CPY #$FF 
the keyboard. (Or earlier if one of — 648F- Do EC 1070 BNE CERGET 
the commands disengages EXEC ACIS COs0e 1080 ole et eal 
6493- DO E8 1090 BNE CHRGET ; JUMP, OR I'M DEAD 
HELLO). 1100 ; di 
6495- AC 7F 65 1110 DONE LDY svY 
498- 91 01 1120 STA (PTR),Y ; STORE EOF 
649A- 20 CC FF 1130 JSR RESCHN RESTORE CHANNEL 
Program Details 649D- AQ 08 1150 ' LDA #8 
649F- 20 AE F2 1160 JSR CLOSE 
SIGNON : 64A2- AQ OF 1170 LDA #15 
This tiny program uses one trick. 64AN- 20 AE F2 1180 JSR CLOSE 
A YP s 1190 ; 
Since a LOAD command issued by = ¢ya7- A5 90 1200 CONECT LDA *INTHND ; A BIT OF 
a program will cause a restart, Bina: 8p e8 64 1210 STA GOBACK+1 ; ROM INDEPENCE 
3 : - 1 *INT 
location 13 is used as a flag that we gu ag- 8B a 64 asa oon COnneees 
are restarting after loadin 6uBI- 78 1240 SEI; NO INTERRUPTS 
: s o g the ; 64B2- AQ £3 1250 LDA #L,INTRTN 
machine-language program. This ue 85 90 1260 STA *INTHND  ; CONNECT 
x : 4B6- AQ 64 1270 LDA #H, INTRTN 
location normally contains a zero. 64BB- 85 91 1280 STA *INTHND41 
BUILD HELL 6NBA- 58 1290 CLI 
‘ Oo ; 64BB- AQ 00 1300 LDA #0 
This program does very straight- GBD BDOTE 65) 1310 STA SVX 
4Co- 3 ‘ies 
forward text entry. I chose to save BN IENeO ese BES oh THATS ALL FOLKS 
i 
the HELLO text as a program file 1340 ; EXEC FILE NOW RUNNING 
on disk, so the text is poked into 1330 : 
memory, and the machine- ioe ae OF _. 1370 ERRCHK LDX #15 ; FILE NUMBER 
ished - F 1380 JSR SETIN 3 SET INPUT CHANNEL 
recs monitor invoked to save pices 20 E4 FF 1390 GER JSR GET ‘ 
the results. The cursor-control keys en 62 a0 1400 EME #E30 i ZERO? 
are thus all active, and ee Pen 63 ae Moc che es j OK, |GET ANOTHER 
; s CMP #$2C ; COMMA? 
Se asdenbics 64CF- DO O4 1430 BNE ERR ; NO - MUST BE BAD 
louble-quote and comma 64D1- 20 CC FF 1440 JSR RESCHN 
cannot cause any problem. The 64D4- 60 1450 RTS 
only checking done in the program ree : 
is to ensure that the text is not too 64D5- A2 13 1480 ERR LDX #ERMSG+256-ERNEND 
ee 1490 ; PRINT *ERROR* 
large for the area allocated to it in 64D7- BD 78 64 1500 ERLOOP LDA ERMEND-256 , xX 
EXEC HELLO. 64DA- 20 D2 FF 1510 JSR PRINT 
64DD- £8 1520 INX 
EXEC HELLO 64DE-~ DO F7 1530 BNE ERLOOP 
The first thing done in EXEC eine a a pee 
HELLO is to count the number of — 64E2- 00 1560 BRK 
characters in the filename. This 13 : 
allows the name to be changed by 1500 ; INTERRUPT ROUTINE 
’ * ° iv 0; 
POKE’s without having to re 64E3- AS 9E 1610 INTRTN LDA *KBUFNO 
assemble the program. Next the aaa 1620 ; LAST CHARACTER PROCESSED? 
error-channel and the text file are BuETe He o3 00 1630 GOBACK SHE Pane iin Se VE SHRE  ANOAHER 
opened. The error-channel is inter- 138 i @nOve REDRESS Oil: BEETLE 
; ; LLED IN 
rogated to make sure there is a 1670 ; BY THE PROGRAM DURING EXECUTION 
HELLO file on the disk. If not, the 1680 ; AS THE NORMAL INTERRUPT HANDLER 
*ERROR* is printed Pe 
a is printed on SUES A501 1700 SENCHR LDA *PTR ; SAVE 'USR! 
the screen and the program breaks ie PRTC SO IA UTES, STA SVETR i) VECTOR 
c x BIOS > 64EF- A5 02 1720 LDA *PTR+1 | (PROBABLY DON'T 
into the monitor. The next file is Be 8D o 65 1730 STA SVPTR+1 ; HAVE TO) 
roadhintomen me x - AD 78 65 1740 LDA MYPTR 
ory, and both chan 64FT- 85 01 1750 STA ¥PTR ; SET UP MY 
nels are closed. The part of the 64F9- AD 79 65 1760 LDA MYPTR+1 5 INDIRECT 
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program which feeds characters in- guEC= 85 02 1770 STA *PTR+1 ADDRESS 
to the keyboard buffer is hooked in REY AO00 ie ; Oe ee 
tthe interrupt processor, and con- G08" 85 6218 ee 
: : - } MP ; ILE? 
trol is returned to BASIC. The in- 6508- FO 65 1820 BEQ UNHOOK ; YES 
terrupt routine sees 506- 8D 6F 02 1830 STA KEYBUF 
Laesckey ees ifthere are any G29" 42 01 18410 LDX #1 ; PRETEND IT CAME 
characters in the buffer, and if not, 650B- 86 9E 1850 STX *KBUFNO ; FROM KEYBOARD 
‘ ‘ . 1860 ; 
deposits one. It looks at the text 650D- AE 7C 65 1870 LDX SVPTR — ; RESTORE 
being passed, and if the word 6510- 86 01 1880 STX *PTR ; 'USR' VECTOR 
6512- AE 7D 65 1890 LDX SVPTR+1 
LOAD appears, sets a flag. At the 6515- 86 02 1900 Se ana 
end of a line, if the flag is set, then 1910 ; 
eee fs 6517- C9 OD 1920 CMP #$0D ; CR? 
the USR vector is pointed at the 6819- DO 24 1930 BNE NOCR NoPE 
re-connect routine in EXEC 651B- AD 80 65 1940 LDA LFLG ; DID WE SAY 'LOAD'? 
651E- FO 1F 1950 BEQ NOCR ; NOPE 
HELLO, and a SYS 0 added to 1960 ; 
the content of the keyboard buffer. pogo 4s og #6 ve fps ae ; RESTORE FLAG 
At the end of the text everything is 6525- A2 05 1990 LDX #5 ; SAY SYSO $0D 
senor Bok. 9D 6F OF 2010 STA KEYBUF,X 
: - E 
EXEC HELLO tries to be 652D- CA 2020 DEX ‘ 
transparent to the rest of the Pet, 6a2E= DO FF eRe BNE SYSLOP 
so it sits in unprotected memory. 6530- A2 06 2050 ° LDX #6 ; 6 CHARACTERS 
; : : 6532- 86 9E 2060 STX *KBUFNO 
This means it could be clobbered if Besse AS AT S070 LDA #L, CONECT , SET UP 
the commands RUN a program, 6536- 85 01 2080 STA *PTR : RESTORE 
‘ és : 6538- A9 64 2090 LDA #H, CONECT ; HOOK 
and cause it to process far enough 653A- 85 02 3100 STA *PTR+1 d 
to build variables on top of EXEC 653C- 4C 6B 65 2110 JMP UNHOOK 
: : 2120 ; 
HELLO. Note also the warnings in ¢53¢_ ag 7z 65 2130 NOCR LDX SVX ; WATCH 
the comments at the start of the 6542- DD 81 65 2140 CMP LOAD,X  ; OUT FOR 
listi 6545- FO 07 2150 BEQ CHKLD ; "LOAD" 
isting. 6547- A9 00 2160 LDA #0 
6549- 8D 7E 65 2170 STA SVX 
654C- FO OD 2180 BEQ ENCHKL  ; JUMP 
2190 ; 
654E- £8 2200 CHKLD INX 
What next . 654F- 8E 7E 65 2210 STX SVX 
EXEC HELLO could be modified Ve EO 04 2220 CPX #4 ; WHOLE WORD? 
. 554- DO 05 2230 BNE ENCHKL ; NOT YET 
to handle Just about any purpose 6556- A9 01 320 LDA #1 i 
where running a program would 6558- 8D 80 65 pn STA LFLG ; SET FLAG 
cause problems but direct com- 655B- AQ FF 2270 ENCHKL LDA #$FF 
mands will work. Several of these 655D- CE 78 65 2280 DEC MYPTR ; DOUBLE 
: 6560- CD 78 65 2290 CMP MYPTR ; DECREMENT 
cases (such as dumping the con- 6563- DO 03 2300 BNE BACK 
Rite ; . ‘ 6565- CE 79 65 2310 DEC MYPTR+1 
tents of a tape'to disk) are handled 6568- 4C E7 64 2320 BACK JMP GOBACK ; SEE YOU SOON 
by utility programs, but with EX- 2330 ; 
‘ 656B- AD E8 64 2340 UNHOOK LDA GOBACK+1 ; RESTORE 
EC HELLO the only thing you 656E- 85 90 2350 STA *INTHND ; "INTERRUPT 
have to do to handle a new re- 6570- AD E9 64 2360 LDA GOBACK+2 ; VECTOR 
ae a : 6573- 85 91 2370 STA *INTHND+1 
quirement is to change the direct 6575_ HC ET 64 2380 SMP GOBACK 
commands on the HELLO file. 2390 ; 
If you wish to obtain a disk ate ee 
containing PET EXEC HELLO aieo Paine 
: i cA 
along with a number of other pro- ry : a 
grams, please send $12 to the 6578- 00 67 2450 MYPTR «SE $6700 ; TOP OF TEXT AREA 
3 Bee 657A~ 2460 FNLEN .DS 1 ; LENGTH OF FILE NAME 
author. If you do key it in or send 657B- 2470 NCHRS ‘Ds 1 ; # CHARS TO SKIP 
for a disk, please give it to all your 657C- 2480 SVPTR .DS 2 ; POINTER SAVE AREA 
if 657E- 2490 SVX -DS 1 ; X REG SAVE AREA 
friends. 657F- 2500 SVY -DS 1 ; Y REG SAVE AREA 
6580- 00 2510 LFLG -BY 0 j si: THIS LINE 
2515 : CONTAINED A 'LOAD' 
6581- 4C 4F 41 2520 LOAD BY ‘LOAD! 
6584- 4h 
6585- 20 53 59 2530 SYS .BY ' SYSO' $0D 
6588- 53 30 OD 
658B- 2A 45 52 2540 ERMSG «BY '®ERROR*! 
658E- 52 4F 52 
6591- 2A 
2550 5 
2560 ; 
2570 ; EQUATES 
2580 ; 
2590 PTR -DE 1 ; INDIRECT ADDRESS 
2600 
2610 INTHND .DE $90 ; INT HANDLER 
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SHLOOP=6419 
CHRGET=647D 
ERRCHK=64C1 
ERLOOP=64D7 
SENCHR=64EA 
CHKLD=654E 
UNHOOK=656B 
FNLEN=657A 
SVX=657E 
LOAD=6581 
/PTR=0001 
/KBUFNO=009E 
/SCNDRY=00D3 
/KEYBUF=026F 
/SETIN=FFC6 
/PRINT=FFD2 


128 COMPUTE! 
3630 RBUFNO ‘DE Soe ; # chars tn purrer | LABEL FILE: [ / = EXTERNAL J 
2640 OPLEN .DE $D1 ; LEN OF FILE NAME 
2650 FNUM »DE $D2 j FILE NUMBER - 
ee eae eae | aie ea cureyea 
2680 FNPTR DE SDA ; ADDRESS OF NAME LENFND=6421 PASS IK= 6806 
2690 KEYBUF .DE $26F ; KEYBOARD BUFFER DONE=6495 CONECT=64A7 
2700 ; GER=64C6 ERR=64D5 
2710 } INTRTN=64E3 GOBACK=64E7 
2720 ; TWO NON-STANDARD ROM ADDRESSES SYSLOP=6527 NOCR=653F 
2130 ce lee ERNEND LESTE mrpracés78 
é 4 NCHRS=657B SVPTR=657C 
| nt ang Haat 
ero Resci DE sFFce. | RESET IT / INTHND=0090 /ST=0096 
SrSOUCET a DE NgeEES /DEV=00D4 /ENPTASOODA 
ang PRUNE “BE serpe /CLOSE=F2AE /OPEN=F524 
/RESCHN=FFCC /GET=FFEY 
//0000,6592,6592 
100 UL = PEEK (59468): 
POKE 59468, 14 
110 PRINT "Si help you create ‘hello! 
120 PRINT "files on disk (drive zero). 
130 PRINT "Qsorry, i'm not a full text editor; 
140 PRINT "use 'stop' if you change your mind, 
150 PRINT "Quse shift @ to signal the end.Q 
160 DLE. f=: 3 16) Ts 3 
MX = SL + 350 
170 POKE 170,0 
180 GET A$: 
IF A$ = "" THEN 170 
190 IF A$ = "@" THEN 260 
200 POKE SL, ASC (A$) 
210 X = FRE (0) 
220 SL = SL + 1 
230 IF SL > MX THEN PRINT: 
PRINT "Qsorry, this hello file is 
too big.": 
POKE 59468,UL: 
STOP 
240 PRINT A$; 
250 GOTO 170 
260 OPEN 15,8,15,"sO:hello" 
270 CLOSE 15 
280  POKE SL,252 VERBATIM 
290 Sit=asShe ant 5%” SSDD #4443 
300 DIM X$(15) 
310 ROR sd) =! 0" TO) 153 
READ X$(J): 
NEXT MAXELL 
330 SLD SL 6 1 3 FAD ae see OM 
340 A2 = INT (SL / 256) 8” SSDD #FD1128M1200 
350 SL = SL - 256 * A2 
360 A3 = INT cat / 16) MEMOREX 
37 AY = SL - 1 A3 ara 
380 PRINT "QQQQQQQQQ.s " CHR$ (34)"0: oe San Eases 
hello"; 
390 PRINT CHR$ (34)",08,3000, "X$(A1)X$ 8” SSSD #3060 
(A2)X$(A3) X$(A4) ” 
400. =PRINT ".x" 8” SSDD #3090 
410 PRINT "QQQQQQQ" 
420 POKE 59468,UL 
430  POKE 623,13: 
POKE 624,13: 
POKE 158,2 
4uO SYS 64785 
450 END: 
REM NEVER EXECUTED 
460 DATA 0,1,2,3,4,5,6,7 
470 =DATA 8,9,A,B,C,D,E,F (oO) [E 


5%” SSDD #18158 w/Hub Ring. .. 32.95/10 


LOWEST PRICES EVER 


DISKETTES 


5%” SSDD #3431 w/Hub Ring. ... 29.50/10 


36.00/10 


24.00/10 


38.00/10 


26.50/10 


31.00/10 
34.00/10 


OTHER TYPES AVAILABLE 


CALL OUR ORDER DESK COLLECT 


(609)829/8553 


COMPUTERWARE OUTLET 
#9 Colonial Square, Cinnaminson, N.J. 08077 
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Agricultural Software 
from Cyberia. 


FOR PETICBM SYSTEMS 

™ f 
Cyber-Farmer tne compete | 
accounting package for today’s farm operations DC 


@ Records, sorts, combines and prints the results of the farm operation. 


Account headings and numbers are pre-assigned for nearly every type 
of farm income or expense, but any account may be deleted, altered or 
added. 


@ Keeps personal, family and house-hold accounts as well. 


i Cyber-Farmer management tools include cash-flow analyses, depreci- 
ation schedules, inventory and budget reports. 
@ No computer experience is necessary to operate this system. 


Farrow-Filer” Farmer’s Workbook 


Record-keeping and management 

system for the pork producer 

@ Helps the pork producer to lower their cost-per-pig 
by producing more animals. 


@ High visual impact of reports allows for better 
culling of freeloaders. 


@ Alerts the operator to possible medical problems 
in the herd. 


@ Forecasts farrowings for a 3 month period. 
i Keeps individual records on each animal. 


The most powerful management tool ever for the 
agricultural producer. Farmers Workbook combines 
the power of Visicalc® * with the knowledge of a ma- 
jor midwestern university. The Farmers Workbook is 
a collection of templates that are designed to be run 
on the Visicalc® program. The templates include 
lables, formulas, sample data, test cases and full 
documentation. Template titles include: Cattle 
Feeder, Pig Production, Sheep Production, Grain 
Management, Loan Payments, Market Average, Land 
Purchase and many others. 

*Visicalc is a trademark of Personal Software, Inc. 


Also...Two Other Enhancements for PET/CBM Systems 
SuperBus' system capabiities 
i 


This is an active, integrated system—not just a passive network. Super- 

Bus gives schools, banks, laboratories and businesses control of the 

“ way their networks operate. 

J ==> => Up to 18 computers, disk drives or printers can be interconnected. 
-—.s— Complete file security (program and data) and BASIC security. 

E Built-in error detection and convenience features. 

$195 Can both read and write to disk. 


per computer @ All BASIC commands can be used. 


@ Auto-Boot is a ROM that automatically loads and runs the first program 
on the disk (initializing if necessary). 


Hi Completely compatible with most other programs. 


@ Just insert the disk in the drive, turn on the computer, and Auto-Boot 
does the rest. 


MasterCard, VISA and C.O.D. orders accepted. Specify computer model when 
ordering SuperBus or Auto Boot. Dealer inquiries invited. 


VBERIA UiG. 515-292-7634 


2330 LINCOLN WAY, AMES, IOWA 50010 
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A Flexible Input Subroutine 


Glenn M. Kleiman Research Triangle Park, NC 


Many interactive programs require a variety of types 
of input from the user. For example, in my own pro- 
grams written for classroom use by children, each of 
the following four types of input are often required: 


1. Alphabetic strings, such as the user’s name or 

answers to questions. 

2. Numbers, such as the user’s age or the an- 

swers to math problems. 

3. Single digits or letters from a restricted set, 

such as when the user is asked to make a selec- 

tion from a menu. 

4. Y or N, in response to questions such as ‘‘Do 

you want to continue? (Y/N)’’. 

A program designed for unsophisticated users 
must have checks that the user’s input is appropriate. 
For example, the programmer must guard against 
the uncertain user who, when given a Yes/No ques- 
tion, presses M for ‘‘maybe’’. Often, particularly in 
programs to be used by children, one should also 
control the number of characters that can be input. 
A program should not accept a name consisting of 
100 letters, nor should it accept 15 digits in answer 
to a math problem that calls for a 3 digit answer. 
Furthermore, the user should be able to erase 
mistakes, and inappropriate responses should not 
stop program execution. 

I have written a general purpose input sub- 
routine to handle all of the above. It is written for 
the PET, but most of the routine is compatible with 
other BASICs, so it can be easily revised for other 
microcomputers. 

Within a program using this subroutine, the ac- 
cepted inputs are specified by assigning values to 
variables before the subroutine is called. The main 
variable is UF, which can have any one of four 
values. If UF =0 (the default value), any letters, but 
no other characters, will be accepted. If UF =1 then 
only numbers will be accepted. For both letters and 
numbers, UM controls the maximum number of in- 
put characters. The default value for UM is set to 1 
in line 300. 

In order to restrict the accepted characters, as 
for menu selection responses, UF is set to 2, and the 
first and last characters to be accepted are assigned 
to variables F$ and L$, respectively. For example, 
the following line in a program will set the 
subroutine to accept only the letters M,N,O, and P: 
UF = 2:F$ = “*M”’:L§ = “‘P’’:GOSUB300 

Finally, to accept only Y or N, UF is set to 3. If 
UF =2 or 3, UM is set to 1 automatically. 

In all cases, inappropriate input is ignored. Input 
characters can be erased by pressing the DEL key 
and a completed input is signaled by pressing 
RETURN. DEL and RETURN are not accepted 


until at least one character has been input. Once 
UM characters have been input, only DEL and 
RETURN will be accepted. 

When RETURN is pressed, UF and UM are 
reset to their default values. Input strings are then 
available in the program as variable IN$, input 
numerics as IN. 

A few other notes. I use a flashing ? as a cursor, 
but any character can be substituted in line 420. In 
line 430, UT = TI+35 controls the rate of cursor 
flashing. The flashing rate of 35 jiffies is slower than 
most cursors, but seems to be less annoying to many 
people than the usual speed. The technique of flashing 
the cursor is based on the INP routine from CURSOR 
#4. This subroutine, and any other frequently used 
one, should be placed at the beginning of the pro- 
gram. The reason is that whenever a GOSUB (or a 
GOTO) occurs, the sequential search for the 
referenced line number begins at the first line of the 
program. An input subroutine placed at the end of a 
long program may be noticeably slow in accepting 
responses. 

This subroutine, written to be easily readable 
rather than compact, uses 406 bytes (without the REMs). 


REM FLEXIBLE INPUT $ 


GLEHH 


THF 
TED INFLUT 
MOOIMPLIT 


IF UF=4 OF 1 SPECIFY 
i MUMBER GF INPUT CHARACTERS 
IM LIHE 36m 
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Skyles Electric Works 


Your students are gathering around the several PET computers in your 
@ Classroom. And they all are hungry for hands-on turns at the keyboards. 
Some students are just beginning to understand computers; others are 
so advanced they can help you clean up the programs at the end of the period. 
How do you set up a job queue, how do you keep the beginners from crashing a 
program, how do you let the advanced students have full access? And how do you 
preserve your sanity while all this is going on? 


A. With the Regent. 


Q. What is the Regent? 


A The ultimate in classroom multiple PET systems. A 
* surprisingly inexpensive, simple. effective way to have 
students at all levels of computer capability work and learn 
on a system with up to 15 PETs while the instructor has 
complete control and receives individual progress reports. 


Up to 15 PETs, one dual disk drive and as many as five 
printers can interface with the Regent. and do all those good things we promised. It’s designed to operate with 


8K, 16K, 32K PET/CBM models and with the Commodore disk drives and new DOS. 


Five levels of user privilege. from the Systems Level, 
through Levels One and Two, Student; Levels One and 
Two, Operator. From only the use of system commands 
to complete control for the exclusive use of the 
instructor. 


There's complete system protection against the novice 
user crashing the program; the instructor has total 
control over, and receives reports concerning, usage of 
all PETs. 


A complete set of explanations for all user commands 
is stored on the disk for instant access by all users. 
And a printout of the record of all usage of Regent is 
available at the instructor's command. 


The Regent includes a systems disk with 100,000-plus 
bytes for program storage, a ROM program module, 
together with a Proctor and a SUB-it . . . and complete 
instructor and student user manuals. 


Q. SUB-it? Proctor? What are they? 


A The SUB-it is a single ROM chip (on an interface 

° board in the case of the original 2001-8 models) 
that allows up to 15 PETs to be connected toa 
common disk via the standard PET-IEEE cables. The 
Commodore 2040, 2050 or 8050 dual disks and a 
printer may be used. 


(The SUB-it has no system software or hardware to 

supervise access to the IEEE bus. The system is thus 
unprotected from user-created problems. Any user — 
even a rank novice—has full access to all commands 


and to the disk and bus. This situation can, of course 
be corrected partially by the Proctor, completely by the 
Regent.) 


The SUB-it prevents inadvertant disruption when one 
unit in a system is loading and another is being used. 


The Proctor takes charge of the bus and resolves 
multiple user conflicts. Each student can load down 
from the same disk but cannot inadvertently load to or 
wipe out the disk. Good for computer aided instruction 
and for library applications, offering hundreds of 
programs to beginning computer users. 


A combination of hardware and software protects the 
disk from unexpected erasures and settles IEEE bus 
usage conflicts. Only the instructor or a delegate can 
send programs to the disk. Yet all the PETs in the 
system have access to all disk programs. Available for 
all PET/CBM models. SUB-it and PET intercontrol 
module and DLW (down-loading software) are included. 


. How expensive are these classroom 
miracles? 


A We think the word is inexpensive. The Regent 
© system is $250 for the first PET; $150 for each 
additional PET in the system. The SUB-it is $40. (Add 
an interface board at $22.50 if the PET is an original 
2001-8.) And the Proctor is $95. 


There are cables available, too: 1 meter at $40 each; 
2 meter, $60 each; 4 meter, $90 each. 


Phone or write for information. We'll be delighted to answer any questions 
and to send you the complete information package. 


Skyles Electric Works 


231 E South Whisman Road 
Mountain View, CA 94041 
(415) 965-1735 
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Universal Tape 
Append 
For PET/CBM 


Roy Busciecker 
Woodbridge, VA 


Many times we run into the situation where we’d 
like to combine programs which have been SAVEd 
separately. Typical examples include subroutines 
which can be used in many different programs; in- 
terest calculations for mortgage, loan, or savings pro- 
grams; complex arithmetic for math or engineering 
programs; and sorting routines for data processing 
applications. 

Owners of Commodore PET/CBM 2001-series 
computers have several alternatives. Several firms of- 
fer a plug-in ROM (read-only memory) in the $50 to 
$100 range, which adds an APPEND command to 
the normal instruction repertoire. 

The program described here allows owners of 
Version 1 (BASIC 2.0), Version 2 (BASIC 3.0), or 
8000 series (BASIC 4.0) PET/CBM computers 
automatically to combine two or more programs 
which were saved on cassette from either one of those 
two computers. 

In use, the program is extremely simple. First, 
LOAD this APPEND program from its cassette. 
Next, take the APPEND cassette out of the recorder, 
and replace it with the cassette that has the first pro- 
gram you want to append to it. DO NOT LOAD 
the second cassette, but RUN the APPEND program 
that is already in the computer. You’ll be instructed 
to ‘‘Press Play on Cassette #1’’, and once you do 
that, the program takes over. After the first program 
has been added, take out the cassette and insert the 
second one you want to add. When you RUN the 
APPEND program again, it will once more ask you 
to ‘‘Press Play...’’, then add the second program at 
the end of the first. After you’ve combined all the 
programs you want to join, delete the BASIC Ap- 
pend routine (type each line number, 0 through 29, 
pressing ‘RETURN’ after each), and use the BASIC 
SAVE command to store the combined version. 


Preparing Programs to be Combined 

A few rules must be observed with regard to the pro- 
grams which are to be joined. In general, you must 
assure that there is no overlap in line numbers bet- 
ween the two (or more) programs. For example, if 
you have two programs where one contains lines 
numbered from 100 to 500 and the other contains 
lines 300 to 700, the computer’s operating system 
will not react ‘normally’ if the two are appended. An 
easy ‘fix’ is to renumber one program or the other, 


so that none of its line numbers fall in the range of 
numbers used in the other program. An exception to 
this rule is the Append routine itself, because it will 
be deleted before you start using the combined pro- 
grams. 

When programs are appended, the one(s) with 
lower line numbers should be done first, to avoid 
problems. 

Some programs, especially those prepared com- 
mercially, were SAVEd from the Monitor rather 
than BASIC, and contain machine language instruc- 
tions ahead of the BASIC routines. These may not 
be combined using this program unless the BASIC 
and machine language sections are ‘‘broken apart’’ 
and stored separately. You may be able to figure out 
how to do this by careful study of this article and 
some experimentation...but be sure that you have 
backup copies of everything critical before you start! 
If the APPEND program detects one of these 
(relatively unusual) programs, it will give you an 
error message and stop without trying to do the 
APPEND. 

As long as you have sufficient room left in the 
computers free memory, you may keep adding pro- 
grams. If you try to add a program which requires 
more than the remaining free space, the program will 
print an error message and not attempt to APPEND. 


How the Program Works 

Actually there are two separate programs which work 
together to do the job. The first (Figure 1) is a 
machine-language routine, loaded in the second 
cassette buffer, which inspects the program in the 
BASIC text area and calculates where the BASIC 
program ends. 


7 BS3A BS Bo AD Bi So AS 69 
rs O242 61 SD 4F a3 AS SD 58 
: B24 63 SD 56 83 AD Be Fe 
. Ba52 15 AA AD Be 2s 55 3 
fe BSSA 69 61 SD 4F a3 BD 56 
yi BS62 85 69 8H Sl 5a 40 4E 
Fi BS6A 8S AD SS es 8h 83 AD 
- B37 56 85 SD SE aS FE BY 


Figure 1a. Machine Language Program Listing (Monitor 
Version, for entering in computer). 


The BASIC Append routine (Figure 2) uses the 
machine-language routine to find the end of the cur- 
rent program in memory. Then it uses one of the 
built-in ROM (read-only memory) routines to find 
the “‘header’’ on the cassette tape at the beginning of 
the SAVEd program. That header contains the start- 


FLOPPY DISK FOR PET?! 


Introductory Special 
PEDISK 


$595.00 
Controller Board, DOS, 
40T Disk Drive & Cable. 
Pedisk II is a small floppy disk controller board that plugs into a ROM socket in your computer. The board contains all the logic required for a disk 
system as well as space for ROM. It is used with standard 5%" or 8” disk drive/power supply housings to form a fast, reliable and inexpensive mass 
storage system, The CRS/PDOS software package provides simple yet sophisticated file handling. The extended command set can be executed 


directly or from a program: LOAD, RUN, SAVE, OPEN, CLOSE, INPUT and PRINT. 


FAST — loads programs at least 3 times faster than 2040. It is the 
fastest disk available for PET. 


SOPHISTICATED — The CRS/DOS op system provides advanced file 
handling, indexed-sequential, but very easy to use. 

$229.00 
$ 75.00 
$395.00 
$ 10.00 


NEED MORE ROM ROOM? 


RELIABLE — single chip disk controller using IBM 3740 recording 
format gives maximum timing margins — super reliability. 
COMPATIBLE — reak diskettes from other systems — 6502PDS, 
AIM, SYM, and even RADIO SHACK (special software). IBM 3740 
soft sector single density. 


MPI B51 DISK DRIVE (40 track) $269.00 
DISK CABLE (2drive)........ $ 35.00 
5%" DISKETTES (box of 10)... . $ 29.95 
PEDISK II DIAGNOSTIC ROM... . $ 29.95 


meet SPACEMAKER II 


Switch between one of four ROMS - software controllable. 
Mix and match — ROMS, PROMS and EPROMS: 2332, 2732, 2532, 2716, etc. 
Vertical mount, put several Spacemakers in adjacent sockets. 


SPACEMAKER II $39.00 


Spacemaker II is a small p.c. board containing four ROM sockets. It 
plugs vertically into any ROM socket in a new PET. The user can 
switch between any of the four ROMS manually or under software 
control using ROMDRIVER or USER I/O. 


ROMO! cries scorers) Siapn & ep endigh See. ae GE te $9.95 
ROM 1/O is a special utility control software package for ROM- 
DRIVER owners allowing software controlled switching of ROMS. 
The package includes menu-driven selection of ROMS and an “‘editor’” 
to add or delete entries — complete control directly from your 
keyboard. Available on Commodore or PEDISK diskette. 


fullFORTH 


INTERPRETER — can be executed directly in an interpretive mode 
to speed testing and debugging. 

CROSS-COMPILER — words can be individually compiled and tested, 
the entire program can also be cross-compiled for maximum efficiency. 
COND. ASSEMBLER — Machine language modules can be intermixed 
and conditionally assembled to fullFORTH. 


ROMDRIVER': asic ace% Bisa meainlecate we ease $39.00 
ROMDRIVER is an accessory parallel output port used to control 
Spacemaker ROM selection without using the User Port of the PET. 
The small p.c. board plugs inside the PET and is connected to 
Spacemakers with jumper cables. 


WSERG/ OE srsorgecsar ie ain. yet yb vareh retaanrenioertosiaice tore $12.95 


USER 1/O allows software control of Spacemaker utilizing the PET 
User I/O port. A connector with specially designed jumpers and the 
diskette with control software “SPACECTL” is provided. Available 
on Commodore or PEDISK diskette. 


FULL FEATURE “FORTH” FOR 6502 SYSTEMS 


STRING HANDLING — variable length constants and variables are 
allowed. Processes compare, move, concatenate and sub-string words. 


FLOATING POINT — process 5 or 9 digit integer and floating point 
numbers for arithmetic operations. 


SCREEN EDITOR -— contains a unique full cursor visible screen 
editor. 


SPECIFY PEDISK, 6502PDS, COMMODORE 2040 DISK .... 1.6... eee eee eee eee ete ttt tte $65.00 


6502PDS { 6502 PROFESSIONAL DEVELOPMENT SYSTEM 


GEOZPDS= MIN sacs ges. 5.503 eet aiereoa 6: oss toe teiatadeteveriavaiial see etaoa bay eaceiee'e ig = ene a leXenaliereie 481 )5 18 eels 7eeusi ene $2695.00 


The 6502 PDS is a versatile multi-card microcomputer designed and programmed for professional engineering and program development work, 
scientific computing, and general processing. This system provides the maximum in capability at the lowest possible cost by utilizing the industries 
must widely used computer bus - the $100. With a choice of over 500 peripherals including telephone interface, speech synthesizers, vocoders, and 
even associate memory, the potential end use is unlimited. The 6502 PDS is housed in a sturdy $100 mainfrain containing the 6502 MPU, Multiple 
1/0 Card, RAM, and Disk Controller Board. This leaves room for future expansion. The system can be connected to any RS232 terminal or used 
with the optional internal Video Board. 


FOR INFORMATION, SEE YOUR DEALER OR: 


(MIGROTECH) 


P.O. BOX 102 e LANGHORNE, PA 19047 e (215) 757-0284 


*PET IS A REGISTERED TRADEMARK OF COMMODORE. 
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Figure 2. BASIC Program Listing 


:PRINT"GOTOL SoTTTETPTMY': 


ing and ending addresses from which its program 
was saved, and knowing those values allows us to 
calculate the length of the program on tape. 

Armed with knowledge of the end of the current 
program in memory, and the length of the program 
to be appended, we can calculate new starting and 
ending locations for loading the program from tape. 
By changing those values before we bring the pro- 
gram in from the computer, we can start loading the 
new program right where the old one ends. 
Complications 
Back when there was only one operating system (set 
of ROMs) for the PET, the APPEND routine was 
much simpler. The second version (BASIC 3.0) 
made several changes which increased the challenge 
in designing an APPEND program to run on either 
version and APPEND a tape which had been created 
on either version. Appearance of BASIC 4.0 in the 
8000 series complicated matters further. There are 
now nine possible combinations, as depicted in 
Figure 3. 

The first problem, and most obvious, is that the 
various ‘“‘built-in’’ routines used by the program are 
in different locations in the two versions. Further- 
more, some “‘fixing-up’’ which is done automatically 
in BASIC 2.0 by the tape load routine requires calls 
to other routines in BASIC 3.0 and 4.0. A summary 
of these differences is shown in Figure 4. 


* BUSDIECKER 
PRIWT " Cleleleteletee)" 
IFFY'=168THEHI6 


4THEHE? 


DS TOF 


ASIC PROGRAM, " 
SEPARATELY. "END 
TO APPEND THIS PROGRAM. ": EH 
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APPEND Program 
running on 


Tare SAUVEd 
by 


Version 1 PET Version 1 PET 
<BASIC 2.05 Version 2 PET“CBM 


8000 Series CBM 


PET“CEM | Version 1 PET 
+0> Version 2 PET“CBM 
8000 Series CBM 


Version 
<BASIC 


wn 


8000 Series CBM 
<BASIC 4.0) 


Version 1 PET 
Version 2 PET/CBM 
8006 Series CBM 


Figure 3 


[ses 2.0 | BASIC 3.0 |BASIC 4.0 | Routine 


SYS 62894 | SYS 62886 | SYS 62949] Find program header 


SYS 62403 | SYS 62393 |SYS 62456 | Load Prosram 


* SYS 50242 | SYS 46262] Fix chaining of rrosram 
link pointers 


*done automatically by BASIC 2.0 ‘‘load program’’ routine 


Figure 4. Differences in Built-in Routines 


One other difference is that on BASIC 3,0 & 4.0 
machines, it is necessary to reset the pointers for 
variable storage to the new end-of-program. This fix, 
too, was done by the ‘‘Load program’’ routine on 
BASIC 2.0 machines. 


Alignment 

More subtle is the problem of properly aligning the 
appended program to the one already in the com- 
puter. Version 1 PET’ start the SAVE process at 
location 1024 (0400 in hexadecimal notation), which 
fortunately always contains a zero. BASIC 3.0 & 4.0 
PET/CBM computers, on the other hand, start 
SAVEing at location 1025 (hexadecimal 0401). 

At the end of each line of BASIC program text, 
there is one byte which contains a value of zero to 
mark the place (not the same as the ASCII character 
zero, which is stored as a value of 48). Following 
each of these line-end markers, except the last one, 
are two bytes containing a line pointer, then two 
bytes containing the value of the program line 
number. The last line-end marker is followed by two 
zero-value bytes, so this series of three zero-bytes 
may be thought of as an end-of-program marker. 
Figure 5 illustrates this scheme. 


10241 


fhe be Pe PEE] 


end of Program 


Figure 5 


Focusing in on the end-of-program area, Figure 6 
shows how each of the two types of SAVEd program 
must be lined up with the program in the machine, if 
a successful APPEND is to occur. Notice that the 
leading byte of the BASIC 2.0 tape (which is always 
zero since it originated in byte 1024) can be overlaid 
on the last end-of-line marker, since both values are 
zero. All we have to do, then, is detect whether the 


Every PET” 


Needs a Friend. 


yl 


Jenny 


CURSOR is the best friend your Commodore PET will ever 
have. Since July, 1978 we have published 150 of the most 
user-friendly programs for the PET available anywhere. 
When we write or edit a program, we spend lots of time 
fussing about how it will treat you. We pay attention to lots 
of little things that help make using a computer a pleasure 
instead of a pain. 


Naturally, CURSOR programs are technically excellent. 
Each program that we purchase is extensively edited or re- 
written by a professional programmer. But imagination is 
just as important as being user-friendly and technically 
good! We delight in bringing you off-beat, unusual 
programs that “show off” the abilities of your PET or CBM. 


CURSOR is user-friendly, technically great and full of 
imaginative programs. And every issue of CURSOR is still 
available! We continue to upgrade previously published 
programs so that they'll work on the three varieties of 
Commodore ROM’s (Old, New, and 4.0). New issues also 
work on the 80 column CBM. 


For only $4.95 you can buy a sample issue and judge for 
yourself. Or send $27 for a six-issue subscription. Each 
CURSOR comes to you as a C-30 cassette with five 
programs and a graphic Front Cover, ready to LOAD and 
RUN on your PET. 


Who knows? After your PET meets CURSOR, things may 
never be the same! 


Published By: 


Distributed by. 
AUDIOGENIC Ltd. 

P.O. Box 88 

Reading, Berkshire 
SYSTEMS FORMULATE Corp. 
Shin-Makicho Bldg., 1-8-17 
Yaesu, Chuo-Ku, Tokyo 103 


tueCODE 
WORKS 


Box 550 
Goleta, CA 93116 
805-683-1585 
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program was SAVEd on a BASIC 2.0 or BASIC 3.0/ 
4.0 machine, and adjust the location for starting the 
LOAD, if necessary. 


Hae “Eee Pew 


computer 1 1 1 


SAVEd om BASIC 2.0 
t 1 1 


SAVEd on BASIC 3.0 or 4.0 LPi 


Figure 6 


Determining Source 

When the tape header is found, the starting and 
ending locations of the SAVE operation which 
created the tape are retrieved and stored in decimal 
locations 635 through 638 (hexadecimal 027B-027E). 
The starting location is in the first two bytes (low 
order byte first, followed by high), and the ending 
address is the last two. If the SAVE was done by a 
BASIC 2.0 computer, then the starting address in 
location 1024 (0400 in hexadecimal notation), which 
636 would contain values of 1 and 4 respectively, 
after the header was found. 

Byte 635, then, holds the key. A value of zero 
indicates a BASIC 2.0 SAVE, while a value of one 
indicates BASIC 3.0 or 4.0. The test for this value is 
in lines 4-6 of the program, Figure 2. If byte 635 
contains neither 0 nor 1, or if byte 636 contains other 
than 4, then the routine on the tape is not a ‘normal’ 
BASIC program, and special steps must be taken 
before it can be appended. 


Entering the Program 

While the BASIC portion of the program may be 
typed in quite simply, the easiest way to enter the 
machine language segment is to use the monitor, so 
it is a good idea to do that part first. 

If you are using a BASIC 2.0 PET, it will be 
necessary to load the monitor from tape, then tell it 
to RUN. On the newer 2001 series computers, simp- 
ly enter SYS 64785. On the 8000 series, enter SYS 
54386. Either machine will then give a display of 
register contents, similar to that at the top of Figure 
1, a dot at the beginning of the current line, and the 
cursor just after the dot. 

Simply type in the locations and contents as they 
are shown in Figure 1, ending each line with a car- 
riage return. When you are finished, type 
M 033A 0377 
and press ‘RETURN’, and your entries will be 
displayed so you can check them. Should any 
mistakes be found, simply move the cursor to the ap- 
propriate location, type in the correct value, and 
press ‘RETURN’ to correct them. 

When you are satisfied that the program has 
been entered correctly, enter X, and the monitor will 
transfer control back to the BASIC operating system. 

Before you start typing in the BASIC part of the 
program, if you are using a BASIC 2.0 PET, be sure 
to type NEW to clear out the monitor. 


acs 


Saving the Program 
When both programs have been entered, be sure to 
SAVE a copy (or two) for security, to avoid the em- 
barrassment of discovering a machine language error 
by losing control of the computer. 

In BASIC 3.0 enter SYS 64785, or in BASIC 
4.0 use SYS 54386, to return to the monitor. Then 
enter 
S ‘‘APPEND”’, 01, 033A, O8BA 
You will get the standard ‘‘Press Play and Record’’ 
messages. When you’re finished, enter X to return to 
BASIC, 

On Version 1 machines, enter 
POKE 247,58:POKE 248,3:POKE 229, 186:POKE 230,8 
then enter SYS 63153. A second copy may be saved 
by simply entering SYS 63153 again. 
Testing 
To see if the program works correctly, first LOAD 
one of the copies you have just made (if you’ve done 
any SAVE or VERIFY, you'll always have to do 
another LOAD to make the program work correctly. 

Then remove the APPEND tape from the 
cassette unit, insert a tape on which another program 


Machine | |Machine | | Machine | [Machine 
Lansuase] [Lansause} |Lansuaze] |Lansuaze 
Routine | [Routine | |Routine | |Routine 
Nae praece| 
<o400> | BASIC BASIC User 
Append Arrend Program 
Routine Routine routine 
"Empty" User User 
Prosram || Prosran | [Program 
sad 
Fiddition 
“Emety" First “Emetu" 
Addition 
“Emetyl" 
It a 
a b c. a e 


Figure 7. Allocation of Memory during Append 
Operations 


a. At beginning of process, append program loaded 
b. After User Program has been appended 

c. After first addition to User Program 

d. After second addition to User Program 

e. End of process, after append routine is deleted 
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has been stored, and enter RUN. After the cassette 
unit stops and the computer reports READY, you 
should be able to enter LIST and see the append 
program followed by the one you just added to it. 

If you have to make corrections to the BASIC 
program, do so in the usual manner, but be sure to 
use the special SAVE instructions described earlier. 
If you need to make machine language corrections, 
then enter the monitor, make the corrections, and 
save as specified. 

Machine language corrections on Version 1 are 
more complicated, but are not too difficult if you’re 
careful. 

1. LOAD the APPEND program 

2. On a separate tape, use the regular BASIC 

SAVE to create a copy of the BASIC portion 
only 

3. LOAD the monitor 
- Make the necessary corrections 
. LOAD the BASIC portion made in step 2 
. Use the modified SAVE procedures (POKE, 

SYS) to save the combined program. 


an 


If a ‘‘high’’ (relocated) Monitor is used, steps 2 
and 5 may be avoided, but this is recommended only 
for those who are confident of their ability to do it 
properly. 

Experimenting 

If you understand how the program operates, it’s 
possible to reduce the size of the program somewhat, 
but be careful and test your condensed program on 
tapes that are not valuable. We intentionally left it 
longer for the article so it would be easier to unders- 
tand. If you only need to use the program on one 
type of computer, you should not have great difficul- 
ty in trimming out the unecessary parts. 

Credits 

Thanks are due to Jim Butterfield, whose discovery 
and publicizing of PET/CBM ROM details made 
possible the program described in this article; and 
also to Jack O’ Neil and Mike Johnson, whose pa- 
tient attempts to use the program in earlier stages 
were of great assistance in refining it. 

Readers with comments or observations on 
operation of the routines are invited to send them to 
me at Virginia Micro Systems, Inc., 14415 Jefferson 
Davis Highway, Woodbridge VA 22191. 


COMMODORE 
COMMODORE 
COMMODORE 


e Z.EP. is pleased to announce immediate 
availability of integrated business programs 
(16) for all Commodore drives. Sixteen (16) 
programs will process any small business 
accounting needs. 


* We have recommended business software 
programs for Commodore systems (8050, 
4040, 2040). Most private firms in the United 
States need this totally integrated application 
software. Call us today 


* Available for all types of businesses and you 
can own the programs 


¢ All programs are written in microsoft basic 
which employs the ‘'relative file’’ disk 
operating system by task. Totally 
integrated!! 


© 8050 disk drive parameters (2 diskettes) 
General Ledger Accounts ... 
190 System Selected Accounts 
65 User Designated Accounts 
Accounts Receivable .......1044 Accounts 
Accounts Payable..... . 174 Accounts 


Inventory Items ... 4440 Items 
Payioll) cise aeariayne 87 Employees 
Depreciable Assets 56 Accounts 
Individual Notes and Loans .. 56 Accounts 


Other Program Parts 


© Totally supported nationally-guaranteed sup- 
port in writing with exclusive dealer 
agreements 


¢ Unconditional guarantee for your territory. You 
can own the programs. Call us today (404) 
289-2265 or (404) 289-1596 


Zaigler alactronic 


COMPUTER SUPPLIES 


3661 Calumet Road Decatur, Georgia 30034 
Phone (404) 289-2265 
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Gene Zumchak 


In my last N&V column (Nov/Dec), I talked about 
parallel interfacing techniques, and intended to talk 
about serial techniques in my next column. Before 
that column reached print, however, Eric Rehnke, 
quite independently, wrote up the same subject for 
his January column. Until I read Eric’s column, I 
actually thought I had covered the topic. Shame on 
me. Between our two columns, I think we have pro- 
bably raised more questions than we have answered. 
Since Eric at least provided a pair of programs, his 
treatment was certainly more complete. So with a lit- 
tle egg on my face, I’m going to take another shot at 
handshaking. 

Handshaking is a scheme by which data can be 
transferred between two asynchronous systems (1) 
without error and (2) at the fastest possible rate. 
While number one is always a requirement, two may 
not be. Still, it is usually desirable to perform a 
handshaking transaction in the shortest possible time. 

True handshaking requires that one flag each be 
asserted by the sender and receiver. The nature, 
polarity, and names of these flags are not standard, 
and a large number of variations are possible. 
Typical names for the flag asserted by the sender are 
DATA READY, DATA AVAILABLE, and DATA 
VALID. The flag asserted by the receiver is 
sometimes called BUSY, DATA TAKEN, or 
ACKnowledge. When looking at an already defined 
handshake sequence, be sure to note whether flags 
are high-true (active-high) or low-true. 

The handshaking signals most likely to be en- 
countered by a computer user are those used with a 
parallel printer, often called ‘‘Centronics’’ handshak- 
ing. Eric stated in his article that he ‘‘decided to 
simplify it (the ‘‘Centronics’’ handshaking signals are 
shown in Figure 1. Note, that although there are 
three handshaking lines, this is NOT a three-wire 
handshake. The line asserted by the sender is a pulse 
called DATA STROBE (usually low-true). The 
receiver (printer) responds by raising a BUSY flag 
(usually high-true). Alternatively, the sender can 
choose not to use the BUSY flag, but instead use a 
third flag called ACK, which is a low-true pulse 
which occurs at the trailing edge of BUSY, in- 


DATA STROBE. 
BUSY 


Figure 1. ‘‘Centronics’’ Printer Handshaking 


dicating that the printer is no longer BUSY and can 
accept characters again. The two flags from the 
printer are provided as a convenience. They convey 
the same information and only one or the other need 
be used. Consequently, the so-called ‘‘Centronics’’ 
handshake is indeed a two-wire handshake. Tradi- 
tionally, the level signal (BUSY) is used when hand- 
shaking is serviced using polling. The pulse signal 
(ACK) is used to set an interrupt flip-flop, when in- 
terrupt servicing is used. (If there are more than one 
receiving devices, a two-wire handshake will not suf- 
fice. A three-wire handshake, invented (and 
patented) by Hewlett Packard, is used on the 
IEEE-488 GPIB to accommodate multiple receivers. 
This bus will be discussed in a future column). 

A very typical handshake sequence is shown in 
Figure 2. The flag asserted by the sender is a low- 
true DATA READY. The flag returned by the 


Figure 2. Typical Handshake Sequence 


receiver is called BUSY and is high-true. The se- 
quence is as follows: 


1. Sender polls BUSY and waits for BUSY to 
become false (not busy). 


2. Sender places data on the data lines. 
3. Sender asserts DATA READY. 


A BRILLIANT FUTURE FOR YOUR AIM-65 WITH THE BANKER MEMORY ™ 


Your 36K of free address 
space is the AIM's most 
valuable and limited re- 
source. With today’s large 
: 5 capacity RAM boards, ROM 
5 ee boards, disk systems, video 
“s 3 ne : boards, and other expansion 
: : accessories it is easy to deplete 
i ae this resource before the applica- 
tion requirement is satisfied. MTU 

has solved this problem. 


THE BANKER MEMORY contains 32K of RAM, 4 PROM sockets for 2716/2732/2332, a PROM programmer, 40 bits of parallel 
1/O, and 4 timers from two 6522 1/O chips. Addressing is extremely flexible with the RAM independently addressable in 4K 
blocks, PROM’s independently addressable, and 1/O addressable anywhere on a 64 byte boundary (even in AIM’s I/O area at 
AXXxX by adding a single jumper to the AIM). 

This may sound familiar, but read on! Unlike other AIM compatible memory boards, THE BANKER MEMORY has on-board bank- 
switching logic! The four 8K blocks of RAM plus the 4 PROM sockets make up 8 resources, each associated with a bit in an 
Enable Register. Through this Enable Register resources may be turned on and off under software control. When a resource is 
off, its address space is freed for other uses. You can even put BANKER resources at the same address and switch among them 
for virtually unlimited RAM and PROM expansion! You can even have multiple page zero’s and stacks! Do you need 160K byte of 
memory? It only takes 5 of THE BANKER MEMORY boards and you end up with 5 page zeros and stacks to boot! 


There's more! The BANKER MEMORY also incorporates 18 bit addressing which allows for the 256K address spaces of the 
future. RAM, PROM, and 1/O each has its own full 18 bit address decoder which allows these resources to be in different 64K 
banks. This board and other MTU products, such as our 320 by 200 dot VISIBLE MEMORY and Floppy Disk Controller with 16K 
DMA RAM, can turn your AIM into a truly powerful 6502 computer that far surpasses the packaged systems in functional 
performance. : 
INTRODUCTORY SPECIAL K-1032-1 32K BANKER MEMORY FULLY ASSEMBLED AND TESTED $395.00 ($450.00 as of 
March 1, 1980) or the K-1032-2:16K RAM only with bank switching and 18 bit address bus only $295.00 
Isn't it time you took a closer look at MTU — we offer you power now with an eye to the future. 
WRITE OR CALL TODAY FOR OUR 48 PAGE FALL 1980 6502 CATALOG 

wore International requests include $1.00 


VISA and MASTERCARD accepted 


J) 
fj 
jf Micro Technology Unlimited 


Photo credit: 
SUPERNOVA CRAB NEBULA: see HLT ee 
Palomar Observatory, Raleigh, NC 27605, U.S.A. 


California Institute of Technology (919) 833-1458 
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4. Receiver acknowledges receipt of data by raising 
its BUSY flag. 


5. Sender removes (raises) DATA READY. 
6. Receiver lowers BUSY when ready for new data. 


This sequence can be seen to be equivalent to that 
suggested by Eric, except that his DATA READY is 
a high-true signal. The choice of signal polarity given 
here is consistent with the operation of program- 
mable port chips. I/O pins on such chips come up 
from reset as inputs and are high. Thus the DATA 
READY naturally comes up in the false state. For 
the receiver, the BUSY comes up naturally high, so 
that no sequence can be started until the receiver 
program is started and its BUSY line is cleared. It 
will not matter, therefore, whether the receive pro- 
gram or the send program is started first. 

Just as the data direction registers come up 
zeroes from reset defining inputs, the data registers 
come up zeroes as well. Therefore, it is a good idea 
to write output data to port bits BEFORE configuring 
the bits as outputs. If the port bits are made outputs 
first, they will immediately fall to zero, since the 
reset line zeroes the data register. Even if the pro- 
gram immediately writes ones to the outputs, all out- 
put lines will experience a momentary glitch to 
ground (for the duration of an instruction) until the 
new data is written. It is important to understand 
that data can always be written to ports as outputs, 
even if they are programmed as inputs. Making a bit 
an input bit merely disconnects the flip-flop from the 
I/O pin. Even though you will not be able to read 
the data that you have written to an output bit, it is 
still in the flip-flop. A representation of a program- 
mable port I/O bit (PAO) and the corresponding 
data direction register bit is shown in Figure 3, and 
is worth discussing. 


+ 


PAO 


DBO 


Figure 3. Programmable Port Structure 


The flip-flop (item 3) has its ‘‘D’’ input con- 
nected to the data bus bit DBO. It can serve as an 
output bit if and only if it is connected to the port 
pin PAO via the three-state gate (item 1). With this 
gate enabled, anything written to the zero bit of a 


port A will appear on the I/O pin. If the gate is 
disabled, however, we are now free to use the I/O 
pin as an input. Note, however, that programming 
the bit as an input DOES NOT PREVENT US 
FROM WRITING TO THE DATA flip-flop. While 
we will not be able to read the data back, the data is 
still in the flip-flop, and it will appear on the I/O pin 
if this bit is subsequently made an output. When the 
port is read it is the condition of the I/O pin that is 
being read, regardless of whether the bit is program- 
med as an input or output. (This is not true of B 
ports, where the data read back when programmed is 
the latched data. That is, a bit can be programmed 
as an output and a one and the I/O pin shorted to 
ground and have it read back as a one). The three- 
state gate (item 1) is controlled by a second flip-flop 
(item 4) called a data direction flip-flop. This condi- 
tion of this flip-flop may be read via its three-state 
gate (item 5). (Note that what we have called a 
three-state gate is in actuality implemented with 
MOS open-drain technology). 


The purpose of this discussion was to convince 
the reader, that it is possible to successfully write 
output data to a port while it is still programmed as 
input. Not only is it possible, but it is recommended 
as good port software technique, to avoid un- 
necessary output ‘‘glitches’’. 


Getting back to handshaking, it is now necessary 
to look at handshaking software. We would like to 
consider both the transmit and receive programs. 
Figure 4 shows a flowchart for a transmit program. 
First the ports must be set up. Then before transmit- 
ting, we must be certain that the receiver is not 
BUSY, and wait until BUSY is false. Then data is 
loaded and sent to the port. Next the DATA 
READY flag is lowered. The program now waits for 
the handshake response from the receiver, that is, for 
BUSY to become true. As soon as that has been 
verified, the DATA READY flag is cleared and the 
memory pointer is incremented and compared with 
the end pointer. If the end has not been reached, the 
process is repeated for another byte. Otherwise the 
program returns to the monitor. 


A flowchart for a receive program is shown in 
Figure 5. After initialization, a wait is made for a 
DATA READY indication, then the data is tucked 
away, the BUSY flag raised, and the pointer in- 
cremented. At this point, the pointer may be com- 
pared with an endpoint for a completion test. If 
done, the BUSY flag is lowered and a return made 
to the monitor. If not, the BUSY flag is lowered and 
another data byte is fetched. 


Both transmit and receive programs can vary, 
depending upon whether speed or code conciseness is 
the most desirable feature. This discussion will be 
continued in the next column with an analysis of 
typical transmit and receive programs. 


March, 1981. Issue 10. 


COMPUTE! 141 


Handshake Flowchart Handshake Flowchart 


RECEIVE 
SET UP PORTS 


TRANSMIT 
SET UP PORTS 


PORT 
I 


INCREMENT 
POINTER 


CLEAR BUSY 


CLEAR BUSY 


Figure 4. Transmit _ Figure 5. Receive 
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The LITTLE BUFFERED MOTHER 
provides the most general possible 
expansion: filling in the first 8K of 
the memory map with RAM and 
buffering all of the E-connector lines 
allows straightforward expansion in 
8K blocks up to 65K. The provision 
for a bank select line allows for ex- 
pansion beyond 65K and/or the ability 
to switch devices in and out of the 
memory map. The four board slots 
on the LITTLE BUFFERED MOTHER 
are sufficient to expand with 16K RAM 
boards (SEA-16 or equivalent) or 
EPROM (SEA-PROMMER II) to 65K. 
The connector on the back of the 
LITTLE BUFFERED MOTHER allows 
further expansion of the motherboard 
(SEA-MAXI-MOTHER). The back con- 
nector can also be used as a board 


SEA-1 SINGLE BOARD DEVELOPMENT SYSTEM $595 

SEA-16 16K RAM BOARD $280 

SEA-CMOS DAY/DATE CLOCK, 8 2K EPROM SOCKETS & 8K CMOS RAM $595 

7K NMOS RAM, 1K CMOS RAM $395 

WITHOUT RAM $289 

SEA-CVT. CVT POWER SUPPLY KIT 110 

TRANSFORMER ONLY $ 55 

SEA-DEBUG HARDWARE BREAKPOINTS AND TRIGGERS $310 
SEA-FDC/8. DOUBLE DENSITY, DOUBLE SIDED DISK CONTROLLER 

(wiDOS for SEA-1) 2 425 

SEA-ISDC. 8 SERIAL PORTS WITH LOCAL PROCESSOR & DUAL PORTRAM = $595 

SEA-LBM LITTLE BUFFERED MOTHER FOR KIM, SYM, AIM. wi4K RAM $199 

WITHOUT RAM. $159 

RAM KIT - ADDITIONAL 4K of RAM & BUFFER FOR LBM/B... $ 50 

SEA-MAX! MOTHER .. 10-SLOT MOTHERBOARD $135 

SEA-MICRO MOTHER 4-SLOT MOTHERBOARD $ 70 

SEA-PIOB. 4 FULLY-BUFFERED 6522s $260 

SEA-PROMMER I! EPROM PROGRAMMER $299 

SEA-PROTO. COMPLETELY DECODED PROTOTYPING BOARD POPULATED $ 99 


BLANK $ 49 
ALL BOARDS ASSEMBLED. 
WE PAY UPS GROUND FREIGHT ON ALL PREPAID ORDERS. PRICES AND SPECIFICATIONS 
ARE SUBJECT TO CHANGE WITHOUT NOTICE. WASHINGTON RESIDENTS ADD 5.3% 
SALES TAX. MASTERCHARGE/VISA ACCEPTED 


The Seawell little buffered mother 
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FROM CASSETTE FAILURES 
PERRY PERIPHERALS HAS 
THE HDE SOLUTION 
OMNIDISK SYSTEMS (5” and 8”) 
ACCLAIMED HDE SOFTWARE 
@ Assembler, Dynamic Debugging Tool, 
Text Output Processor, Comprehensive 
Memory Test 
@ Coming Soon—HDE BASIC 
PERRY PERIPHERALS S-100 PACKAGE 
Adds Omnidisk (5) to 
Your KIM/S-100 System 
® Construction Manual—No Parts 
@ FODS & TED Diskette 
@ $20. +$2. postage & handling. (NY residents 
add 7% tax) (specify for 1 or 2 drive system) 
Place your order with: 
PERRY PERIPHERALS 
P.O. Box 924 
Miller Place, N.Y.11764 


(516) 744-6462 
Your Full-Line HDE Distributor/ Exporter 
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slot. The whole system can be run 
from a regulated supply by shorting 
out the onboard regulators. The 
LITTLE BUFFERED MOTHER also 
has three LEDs indicating power, IRQ, 
and NMI. A KIM keyboard/TTY switch 
is also provided. 


Little Buffered Mother 
wi4kK RAM. 


Connects directly to the KIM, SYM or AIM 
4 expansion slots 


* Buffers for all signals 

* 4K RAM on board 

* Application and expansion connectors available 
© +5V, +12V, and —12V regulators 


Bank Select signal 

Full decoding for the KIM-1 

Power, NMI and IRQ status LEDs 
Provision for additional motherboards 


Seawell products are also available from 


Excert Incorporated and 
AB Computers. 


i 


BOX 30505, 
SEATTLE, WA 98103 


206/782-9480. 
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Experimenting 
With 
The 6551 ACIA 


Marvin L. De ave 

Department of Mathematics-Physics 
The School of the Ozarks 

Pt. Lookout, MO 


There is a growing interest in data communications, 
computer networks, time-sharing services and other 
forms of intercomputer communications. An impor- 
tant element in many data communications systems 
is an Asynchronous Communications Interface 
Adapter (ACIA). Both Rockwell International and 
Synertek manufacture a 6502 family device known as 
the 6551 ACIA. The purpose of this article is to pro- 
vide information about interfacing this device to 
6502-based microcomputers and to provide informa- 
tion about operating and controlling the 6551 with 
software. 

Since I was not familiar with this chip, I decided 
to do some simple experiments with it to supplement 
the meager (in my opinion) information supplied by 
the specification sheets from Rockwell and Synertek. 
In particular, I decided to use my AIM 65 
microcomputer as a smart terminal for a KIM-1, 
operating the latter in its ‘‘teletypewriter’’ mode. 
Although this may seem ridiculous, the idea might be 
useful in a laboratory where various student stations 
have a KIM-1 that is used for experiment control or 
data acquisition. If all the KIM-1s were connected to 
a central terminal, one could load a program into all 
of them simultaneously or, with the appropriate 
switching circuitry, one could collect and process 
data from each of them. In any case, the experiment 
taught me what a KIM-1 is like when operated in its 
TTY mode rather than from its keypad, and more 
importantly, I learned some things about the 6551 
ACIA. 

A circuit that can be used to interface the 6551 
to a 6502-based microcomputer is shown in Figure 1. 
The connections to the microcomputer are on the 
left-hand side of the figure. The advantage of using a 
family-type chip is the ease with which the device 
may be interfaced to the microcomputer. Thus, the 
connections IRQ, RES, 92, R/W, and the data bus 
connections are all straightforward. If the lines bet- 
ween the microcomputer and the 6551 are kept short, 
a few inches or so, no buffering is required. This cir- 
cuit was built on a protoboard attached to the expan- 
sion connector of an AIM 65. The four registers on 
the 6551 are selected with address lines AO and Al 


March, 1981. Issue 10. 


connected to the register select pins RS@ and RS1, 
respectively. 

The chip select (or device select) signals, CSO 
and CSI, can be obtained in several ways depending 
on your microcomputer system. The AIM 65 pro- 
vides a DS9 device select pulse that is active at logic 
zero for all addresses $9000 through $9FFF. This 
signal is available at the expansion connector, and it 
was used in this circuit. The CS@ pin could have 
been connected to +5V, but we chose to connect it 
to address line A1@ to save half of the address space 
between $9000 and $9FFF for other possible I/O 
functions. 

If you have a SYM-1 you can use device select 
18, which is available on the expansion connector, 
for CSI. Pin CSO can either be tied to logic one 
(+5V) or connected to an address line to divide the 
device select 18 address space in half. 

If you have a KIM-1 you can use one of the 
device selects K1 to K4 with suitable pull-up 
resistors, say 1000 ohms. Tie CS@ to +5V. 

If you have an APPLE II you can build the in- 
terface shown in Figure 1 on a peripheral card and 
plug it into one of the eight card slots. However, you 
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Figure 1. The circuit to interface the 6551 ACIA to a 
6502-based microcomputer to control a KIM-1. 


must build your own decoding circuit because you 
cannot use either the device select (DS) or the I/O 
select signals. 6502 family chips such as the 6522 and 
the 6551 generally require that the address lines and 
the chip selects are stable some time (approximately 
200 nanoseconds) before the rising edge of the @2 
clock signal. The device select signals generated by 
the APPLE II address decoding circuitry have been 
ANDED with @2 (actually 00), and consequently they 
cannot be used. This is really unfortunate since it 
would be very easy to interface 6502 family chips to 
the APPLE’s peripheral bus if it were not for this 
fact. One could use a 74LS04 inverter and a 74LS30 
eight input NAND gate to generate a device select 
for some page of memory not used by the APPLE II, 
if you want to interface a 6551 to your APPLE II. 


March, 1981. Issue 10. COMPUTE! 143 


EXCERT, INCORPORATED 
* ok AIM-65 * * 


SPECIAL 
P/N QTY 1-9 P/N QTY 1-9 
A65-1 AIM-65 w/1K RAM .........- $375 A65-4AB AIM-65w/4KRAM .......... $595 
A65-4 AIM-65 w/4K RAM .........- $420 Assembler and BASIC 
A65-A Assembler ROM............- $85 A65-4B = AIM-65 w/4K RAM, BASIC.... $510 
A65-B BasicROMS ...... eee as $100 A65-F Forth ROMS .........0.+-65 $150 
A65-PL PL/65ROMS............... $125 


PIN 
ACCESSORIES From Seawell Marketing, Inc. 


MCP2 Little Buffered Mother™ Single 44 pin (KIM-4 style) mother 

P/N QTY 1-9 card takes MEB2, PGR2, PTC2 and PI02. Has on 5V 
Power Supplies (Fully AIM-65 Compatible, In- regulator for AIM-65, 4 expansion slots. Routes A&E signals 

to duplicates on sides with 4K RAM ............++-- $1 

dustrial Quality Open Frame) MEB2 SEA 16™ static RAM board takes 2114L with regulators and 
PRS3—- +5V at 3A, +24V at 1Aw/mtg hardware, cord, etc. ...$65 2 arcar SARE Eee Cat $280 
PRS4 + 5Vat 2A, + 24V at .5A w/mtg hardware, cord, etc. ...$50 PGR2 _Programkmer. for 5V EPROMS with ROM firmwave, 
PRSS +5V at 2A, +24V £15% at SA212V to +£15V at regulators, low force sockets, up to 8 EPROMS simul- 
IAD) ciscwes sien gugcit ath deed vii sipisisain Scie ai Saiaelaaan $75 taneously, can execute after programming . . $299 

Pio2 Parallel I/O board with 4-6522’s ........ .$260 

From The Enclosure Group PTC2 _Proto/Blank™ Prototype card that fits MCP2 . $49 


ENC1 — AIM-65 case ..$99 


ENCIA — AIM-65 case w/space for one expansion board . 


PTC2A _Proto/Pop™ with regulator, decoders, switches . 


Cases With Power Supplies From MTU 
ENC3 ENC1 w/PRS3 mounted inside .. DAC3 8 bit DAC Board a+ $49 
ENC3A ENC1Aw/PRS3 mounted inside . - $119 FDC3 Floppy disk controller bd. & DOS, up to four 514” or 8” drives, 
ENC4 ENC1 w/PRS4 mounted inside 
ENC4A — ENC1Aw/PRS4 mounted insi 
ENCS ENC1 w/PRS5 mounted inside 
ENC5A ENC1Aw/PRS5 mounted inside . 


MCP3 Card file 
brackets 
MEB3-2B Banker board, |, low power, 
26522 1/O chips & programmer for 5V EPROMS 


From The Computerist, Inc. PIO3 24K PROM, 4-8 bit I/O ports w/RS-232 port to 4800 BPS. 
MCP1-2 Mother Plus II™ Dual 44 pin mother card takes MEB1-2, PROM Programmer .......+-+2+00eeeeeeeereeeee $295 
VIB1, PTC1, fully buffered, 5 expansion slots underneath the VIB3 8K DRAM Bd. low power w/composite video out in 200 lines 
RIM ses cease diovarsticstins leis sia oe Ginik aiataaoieutsvioentae ts $100 320 dot/line format .........-...-.seeseceeeeeee $240 


MEB1-2 DRAM Plus™ 32K RAM, 16K Prom sockets, 2-65221/O chip - 
and programmer for 5V EPROMS .$16K RAM $295 All MTU Software Available For These Products. 


$32K RAM $395 


PTC1-2 e as KIM-1, MEB1-2, 
Retro ies aintatslaricts yacaia nn caielsleia calaslagaaneet $60 Miscellaneous 
VIB1-2 Video Plus II™ board with 128 char, 128 user char, up to 4K TPT2 Approved Thermal Paper Tape 
display RAM, light pen and ASCII keyboard interface . .$295 5/165" rolls $10 
CABLE For MEBI-2, VIb1-2, PTC1-2........0.00c00eeeeeee $15 MEM6 6/2114 RAMChips... $45 
. CAS1 _ Available Audio Cassette Recorder $40 
From Optimal Technology 2716 16K5V EPROM .. Call for latest prices 
ADC1 A/D eight channels, D/A 2 channels. Requires #12V to 2532 32K5V EPROM . Call for latest prices 
+ 15V at 100MA & 2-1/0 Ports from AIM-6522.......$126 A65-P Printer... .$75 
Bae eee ee area eicchnsrasieroien ete .. $25 A65-DM Display Module . $30 


All AIM-65 Spare Parts Are Available 


ASSEMBLED & TESTED 
SYSTEMS 


We specialize in assembled and tested systems made from the above items. Normally, the price 
will be the total of the items, plus $5 for handling, shipping is extra on all C.O.D.’s or invoiced 
orders. Six Month Warranty on all systems. 


Higher quantities quoted upon request. Please call or write for exact 


C.O.D.’s accepted, shipping will be added. prices or if questions arise. 

Add $5.00 for shipping, insurance and Mail check or Money Order To: 
handling on prepaid orders. EXCERT, INC. 

Minnesota residents add 4% sales tax. Educational Computer Division 
Prices subject to change without notice. P.O. Box 8600 


WHITE BEAR LAKE, MN. 55110 
621-426-4114 
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Proceeding to the circuitry on the right-hand side of 
Figure 1, you will note that you need a crystal whose 
frequency is 1.8432 MHz. The remaining connec- 
tions are either input or output pins that connect the 
6551 to devices outside of the microcomputer system, 
such as a modem or, in the experiment described 
here, another microcomputer. In this application 
only the data output (TxD) and data input (RxD) 
pins were used. A 74LS04 was used to provide 
suitable buffering between the 6551 and the KIM-1 
printer sade pins for the teletypewriter. The 
input pins CTS, DCD, and DSR are tied to logic 
zero while the output pins RTS and DTR are left 
floating in this application. If the 6551 were con- 
nected to a modem, printer, or another terminal, 
then these pins would be used. The similarity bet- 
ween the names of these pins and RS-232C pin func- 
tions is not a coincidence. My modem requires the 
CTS, DSR, and DCD connections. A 1488 RS-232C 
line driver and a 1489 RS-232C line receiver could 
be used to change the voltages to the appropriate 
levels for a standard RS-232C interface, but we 
chose to experiment with a KIM-1, and did not need 
RS-232C signals. 

If AQ and Al are used as register select signals, 
as indicated in Figure 1, then the low-order nibble of 
the address that accesses the 6551 will be $0, $1, $2, 
and $3 for the data registers, status register, com- 
mand register, and control register, respectively. For 
example, if the address decoding scheme shown in 
Figure 1 is used, the transmitter data register is ac- 
cessed by WRITING to $9400 and the receiver data 
register is accessed by READING location $9400. 
Writing to the status register at $9401 causes a pro- 
grammed RESET, and the status register is read at 
$9401. Refer to Figure 2 to identify the meaning of 
the bits in the status register. 


STATUS REGISTER ($9401) 


NOT FULL 
FULL (IRQ OPTION) 


‘ s 


INTERRUPT FLAG— 
0» NO INTERRUPT 
1 > INTERRUPT 


DATA SET READY FLAG 
(0 = DSR LOW (READY) 
1 = DSR HIGH (NOT READY) 


DATA CARRIER DETECT FLAG 
0 = DCD LOW (CARRIER DETECTED) 
1 = DCD HIGH (NO CARKIER) 


TRANSMITTER REGISTER FLAG 
0 = REGISTER NOT EMPTY o- 
1 = REGISTER EMPTY (IRQ OPTION) ne 


Figure 2. Schematic diagram of the status register of the 
6551. 

For the simple experiments described here the 
status register bits of most interest are the transmit- 
ter register flag and the receiver register flag. 
Writing to the transmitter register clears the register 
flag, and one should not write data to this register 
again until the data in the transmitter register has 
been transformed into a serial bit stream and has 
been transmitted by way of the TxD pin. When the 
word has been transmitted, bit four goes to logic one, 
and the transmitter data register is ready to accept 


another word. Likewise, when a complete word has 
been received by way of the RxD pin and the word 
is in the receiver data register, then bit three of the 
status register goes to logic one, and the word is 
ready to be read from the 6551. Both of the events 
just described may be used to produce interrupt re- 
quests (IRQ pin goes to logic zero). That is, by pro- 
gramming the command register, one can produce 
an interrupt request either when the transmitter 
register is empty or when the receiver register is full. 


COMMAND REGISTER (59402) 


© | > f sellh [ae 
i 0 SOY READY (BTR MGM 
opp rantty ri 
EVEN PARITY PAR scrauainey aeSUsST CONTRON 
10 Mak O8 PARITY BIT On INQENABLED nt 
Nopantty cHcn 12 1KG DisamieD 
11 SPACE ON PARITY BIT 
No 'pantry cilEck 
TRANSMITTER INTERKUPE CONTROL 
6.0 RIS HIGH, No INTERRUPT 
PARITY CONTROL ENABLE Ot RTS Low. iNreRRUPT 
0 = NO PARITY BIT ON T 1 0 RTS LOW, NO INTERRUPT 
NO PARITY CHECK ON 11 RTS Low. NO INTERRUPT 
1 = PARITY CONTROL ENABLED TRANSMIT BEAR 
RECEIVER ECHO CONTROL 
No reo 3 uta 
1 = RECEIVER ECHO Figure 3. Schematic diagram of the 


command register of the 6551. 


Refer to Figure 3 to identify the meaning of the 
various bits in the command register, and refer to 
Figure 4 to identify the meaning of the bits in the 
control register. The function of these registers will 
become apparent when we describe the program to 
use the AIM 65 as a terminal to control the KIM-1. 
In short, they allow the user to program the 6551 to 
operate under a large variety of conditions. 

The program to test the 6551 with the AIM 65 
and KIM-1 is given in Listing 1. The main program 
reads the keyboard and outputs this character to the 
6551 transmit data register. The interrupt routine 
(remember to load the interrupt vectors if you use 
this program) reads the 6551 receive data register 
when the KIM-1 returns information to the AIM 65. 
In short, the entire program makes the AIM 65 
behave exactly like a teletypewriter terminal as far as 
the KIM-1 is concerned. Since the 6551 is being 
operated in the interrupt mode, the first instruction 
in Listing 1 clears the 6502 interrupt flag to allow the 
6551 to interrupt it. The next two instructions in the 
program load the command register. Refer to Figure 
3 to see what bits were set or cleared. Since the 
KIM.-1 software in the monitor simply strips the 
parity bit from any received word, the command re- 
gister was initialized to disable and disregard any 
parity bits. Since the 6551 is being operated in an in- 
terrupt mode, bit one of the command register is 
cleared. However, it is the receiver portion of the 
6551 that is being allowed to cause an interrupt, thus 
bit three of the command register is kept at logic one 
to prevent interrupts from the transmitter. The other 
bits of the command register control the handshaking 
signal pins of the 6551, and therefore they were not 
of any concern in this application. 

The fourth and fifth instructions in Listing 1 


March, 1981. Issue 10. 


COMPUTE! 


load the control register. Refer to Figure 4. A 
‘three’ in the low-order nibble of the control 


CONTHOL REGISTER ($403) 


6 sil 4 4 | 2 1 ° 


STOP BIT NUMBER 
0 = 1 STOP BIT 
1 = 2 STOP BITS 


L_ nap rare CONTROL 
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es O00 0 We EXTERNAL CLOCK 
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10 6 BITS corr 3 We 
Uy Sats oroo 4 
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RECEIVER CLOCK SOURCE 1000 & 
TS ERTERNAL CLOCK (is INPUT) Toot 3 1800 
¢: EacD RATE O10 A 240 
Toit & wo 
100 c 40 
itor b 20 
Trio & 360 
bint #10 
Figure 4. Schematic diagram of the control register 


of the 6551. 


register sets the Baud rate at 110. Higher Baud rates 
are possible, depending in part on whether the ther- 
mal printer on the AIM 65 is used. Without the 
printer operating, rates as high as 2400 Baud are 
possible. The usual teletypewriter data format is one 
start bit, seven data bits, one parity bit, and two stop 
bits. However, a number of formats will work, and 
we chose an eight bit word with one stop bit. Note 
however that the command register was set up for no 
parity bit, thus our word looks just like a word in the 
teletypewriter format. If we would have loaded the 
control register with $BA sending seven bits of word 
and two stop bits at 2400 Baud, the program would 
still work. In order to interface the 6551 to any 


device you must program the command and control 
registers to match the protocol of the devices that are 
communicating. 

Still keeping an eye on Listing 1, note that the 
next instruction is a subroutine jump to an AIM 65 
subroutine that reads the keyboard and returns the 
ASCII code for the key depressed in the 6502 ac- 
cumulator. This character is loaded into the 6551 
transmit data register, and is promptly sent out on 
the TxD pin in serial form. Before getting another 
character, the program waits in a loop until the word 
is sent. It does this by examining bit four in the 
status register (refer to Figure 2). When the character 
has been sent and the transmit data register is 
empty, then the program loops back to get another 
character when the keyboard is scanned. 

Refer next to the interrupt routine. A PHA in- 
struction saves the accumulator. Next, the receive 
data register is read. The only time an interrupt 
occurs is when a new word is received from the 
KIM-1, and the second instruction of the interrupt 
routine gets the character in the accumulator of the 
AIM 65’s 6502. Next, it outputs the character to the 
AIM 65 display. The fourth instruction clears the in- 
terrupt signal from the 6551. The accumulator is 
recalled, and the interrupt routine is concluded. 

A future project includes interfacing the 6551 to 
a Novation Cat modem and trying to send informa- 
tion over telephone lines. Anyone out there care to 
join this experiment? 


Listing 1. Routines to Control the KIM-1 with an AIM 65. 
CTRLRG = $9403; Control register of the 6551. 
CMNDRG = $9402; Command register of the 6551. 
STATUS = $9401; Status register of the 6551. 
RDWR = $9400; Read/Write Data register of the 6551. 
$OFOO 58 START CLI Clear interrupt flag. 
OFO1 A9 09 LDA #$09 Set up command register. 
OF03 8D 02 94 STA CMNDRG 
OF06 A9 13 LDA #$13 Set up control register. 
OF08 8D 03 94 STA CTRLRG Baud rate is 110. 
OFOB 20 3C E9 REPEAT JSR GETKEY Get input character from the 
OFOE 8D 00 94 STA RDWR AIM 65 keyboard, output it to 
6551. 
OF11 AD 01 94 CHECK LDA STATUS Is transmit register empty? 
OF 14 29 10 AND #$10 
OF16 FO F9 BEQ CHECK No. Then wait here. 
OF18 DO F1 BNE REPEAT Yes. Then get another character. 
Interrupt Routine 
$0E00 48 IRQ PHA Save accumulator. 
0E01 AD 00 94 LDA RDWR Read the receive register and 
0E04 20 7A E9 JSR OUTCHAR output the result. 
0E07 AD 01 94 LDA STATUS Read the status register to clear 
OEOA 68 PLA the interrupt flag. 
OEOB 40 RTI Return to the main program. 


INTERRUPT VECTORS: [$A404] = $00; [$A405] = $0E 
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A Vocal Hex 
Dump For The 
KIM-1 


William C. Clements, Jr. 

Dept. Of Chemical And 

Metallurgical Engineering 

The University Of Alabama 

This article describes a program for the KIM-1 that 
begins at a given RAM address and pronounces the 
contents of successive locations, with appropriate 
pauses inserted for naturalness, just as a person 
would read off a list of hex words. It uses what is 
almost certainly the least expensive speech synthesis 
equipment and software now on the market; for 
about $100, the single-board computer owner can ex- 
periment with computer-generated speech. The pro- 
gram given here is concerned with removing a little 
of the drudgery from proofreading programs in 
RAM. The program runs on a KIM-1 to which has 
been added a 6522 VIA and at least 1K of expansion 
RAM. 

Personal computers surely are the ultimate in 
modern versatility, making everything from 
dungeons-and-dragons to home automation to self- 
instruction in computer science available to nearly 
everyone. But no matter how much fun it is to use 
the polished end result of one’s programming, the 
checking of machine code to see if it was entered cor- 
rectly remains pure drudgery, and the cleverest 
technology isn’t likely to ever place it on a level with 
playing a rousing game of motorcycle racing with the 
computer. For those of us with video terminals but 
no printer, it can be especially irritating; one’s eyes 
move up to the screen dump, down to the written 
program, up and down, kind of like watching a ver- 
tical tennis game, until the eyes have had it. 

It would help to have someone read off the code 
from the screen so the programmer can keep his eyes 
on the paper. But another person isn’t always 
available, and anyhow this is just the kind of work 
that computers were invented to handle, right? The 
only trouble is, most speech synthesizers are expen- 
sive, and are usually for the S-100 bus, not directly 
usable with the KIM or similar single-board 
machine. Now, thanks to Texas Instruments, Inc. 
and Dave Kemp of East Coast Micro Products, these 
objections have been neatly removed. The T-I Speak 
and Spell™, an inexpensive ($50 range) pre- 
programmed speech synthesizer computer was 
developed to teach kids to spell.! Its internal ROMs 
contain the coding to vocalize hundreds of words plus 


several phrases, the letters of the alphabet, and the 
numerals. But it’s more than a toy. The device has 
an internal edge connector intended for plugging in 
additional vocabulary ROMs, and the various con- 
trol lines that operate the speech synthesizer are 
available there. East Coast Micro Products market a 
small interface kit, model SP-1', that plugs onto the 
edge connector, and performs the level shifting and 
parallel-to-serial conversion needed for interfacing the 
synthesizer to a computer. The whole thing fits into 
the battery compartment of the Speak and Spell™, 
making a very neat package. Along with the interface 
board, you get extensive support software, a detailed 
explanation of how the synthesizer works, and five 
demo programs written for the SYM computer. The 
software includes a program for pronouncing in- 
dividual hex characters whose ASCII representation 
has been placed in the accumulator, and uses the 
6522 VIA that the SYM uses for I/0. 

As mentioned at the start of this article, my im- 
mediate goal in purchasing the SP-1 was to use it 
with a KIM to read out memory words. The listing 
gives the resulting program. The user begins execu- 
tion at BEGIN, types the first RAM address on the 
TTY, and the program reads 256 locations out on 
the Speak and Spell™. If you’re checking fewer loca- 
tions, just hit the reset key when you’re through. If 
your program is longer, type in the next location and 
it will read you 256 more. 

The comments in the listing should be self ex- 
planatory for the most part. Label references not 
defined in the listing (such as FPNT, OUTSPE, etc.) 
are mostly labels in the SP-1 software. GETBYT is a 
routine in the KIM monitor. 

The SP-1 software is set up to use the 6522 Ver- 
satile Interface Adaptor on the SYM board, so unless 
you want to re-program extensively, your best bet is 
to add a 6522 to your KIM; you ought to have one 
anyhow if you’re a serious KIMmer. Mine was 
already present on a VIDEO PLUS™ board that I 
use with my system!. If you don’t have a VIA in 
your system, I suggest you refer to the articles listed 
in the footnotes*-*. It should not be hard to provide 
one. The SP-1 software resides entirely in the KIM 
on-board memory with one exception: the speech 
data dictionary provided with the software requires 
770 bytes of continuous memory in addition to the 
478 bytes required by the SP-1 support software and 
by the vocal dump routine. None of the code is self- 
modifying, so you can relocate it at will, even into 
EPROM where it will become a valuable utility. The 
only memory that has to be RAM is the twelve-byte 
frame buffer which I located between $17A0 and 
$17AB. If you do relocate, take care to adjust the en- 
tries in TABLE. These are address pointers to entries 
in the speech dictionary supplied with the SP-1. The 
accompanying program listing assumes that the dic- 
tionary resides between $2000 and $2302 in expan- 
sion memory. 


VAK-1 MOTHERBOARD 


We also carry: 

SYM-1 $229” 
AIM-65 w/1K = 389°° 
AIM-65 w/4K 439° 


We also do custom 
hardware and soft- 
ware for the 6502 
microprocessor 


PRICE: $139° 


Call or write for 
shipping charges 
and our complete 
catalog. 


The VAK-1 was specifically designed for use with the KIM-1, SYM-1 and the AIM 65 Microcomputer Systems. 
The VAK-1 uses the KIM-4* Bus Structure, because it is the only popular Multi-Sourced bus whose expansion 
boards were designed specifically for the 6502 Microprocessor. 


SPECIFICATIONS: 

e Complete with rigid CARD-CAGE 

e Assembled (except for card-cage). Burned in and tested. 
e All IC’s are in sockets 

e Fully buffered address and data bus 


Uses the KIM-4* Bus (both electrical Pin-out and card size) for expansion board slots 


Provides 8 slots for expansion boards on 1” centers to allow for wire-wrap boards 


Designed for use with a Regulated Power Supply (such as our VAK-EPS) but has provisions for adding 
regulators for use with an unregulated power supply. 


¢ Provides separate jacks for one audio-cassette, TTY and Power Supply. 
¢ Board size: 14.5 in. Long x 11.5 in. Wide x 8 in. High 
¢ Power requirements; 5V.DC @ 0.2 Amps. 


*KIM-4 is a product of MOS Technology/C.B.M. 


~}) RNBD ENTERPRISES mirage ee 
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0010 -BA $100 
0020 ADLO -DE SA 
0030 ADHI -DE $B 
0035 SPNT sDE 2 
0040 GETBYT -DE $1F9D 
0050 FPNT -DE 4 
0060 SPINIT -DE $200 
0070 OUTSPE -DE $2D0 
0100- 20 9D 1F 0080 BEGIN JSR GETBYT ;GET START 
0103- 85 OB 0090 STA *ADHI ;ADDRESS 
0105- 20 9D 1F 0100 JSR GETBYT 7FROM 
0108=- 85 OA 0110 STA *ADLO ;KEYBOARD 
O10A- AQ AO 0120 LDA #SA0 ;SET FRAME 
010c- 85 04 0130 STA *FPNT ;POINTER 
O10E- AS 17 0140 LDA #$17 7TO 
0110- 85 05 0150 STA *FPNT+1 ;$17A0 (12 LOCS NEEDED) 
0112- 20 00 02 0160 JSR SPINIT 7SET UP TIMERS 
0115- 20 2D 01 0170 JSR PAUSE ;PAUSE BEFORE SPEAKING 
0118- AO FF 0180 LDY #$FF 7USE Y TO COUNT LOCcS. 
O1l1lA- C8 0190 LOOP INY ; DUMPED 
01l1B- 98 0200 TYA 
Ollc- 48 0210 PHA 
011D- Bl OA 0220 LDA (ADLO),Y ;GET CURRENT CONTENTS FOR DUMP 
OllF= 20 31 01 0230 JSR SAY ; PRONOUNCE CONTENTS; 
0122- 20 2D 01 0240 JSR PAUSE ?;THEN PAUSE 
0125- 68 0250 PLA 
0126- A8 0260 TAY 
0127- c9 FF 0270 CMP #SFF 
0129- DO EF 0280 BNE LOOP ;LOOP 256 TIMES 
012B- FO D3 0290 BEQ BEGIN ;GET NEW START 
012D- A2 20 0300 PAUSE LDX #$20 ;SET POINTER FOR PAUSE 
012F- DO OE 0310 BNE SPl 7BRANCH TO SPEECH PAUSE 
O131- 48 0320 SAY PHA 7SAVE CONTENTS 
0132- 29 FO 0330 AND #SF0 ;GET HIGH-ORDER NYBBLE 
0134- 4a 0340 LSR A ;}FORM INDEX 
0135- 4A 0350 LSR A 7INTO ADDRESS TABLE 
0136- 4A 0360 LSRA 
O137= 20 36 01 0370 JSR SPEAK ;SPEAK FIRST CHARACTER 
013A- 68 0380 PLA 
013B- 29 OF 0390 AND #$F ;GET LOW-ORDER NYBBLE 
013D- 0A 0400 ASL A ;FORM INDEX 
O13E- AA 0410 SPEAK TAX ;AND FALL THROUGH 
O13F- BD 4C 01 0420 SP1 LDA TABLEFX ;TO SPEAK IT 
0142- 85 02 0430 STA *SPNT 
0144- BD 4D 01 0440 LDA TABLE+1;X 
0147= 85 03 0450 STA *SPNT+1 
0149= 4c DO 02 0460 JMP OUTSPE 
014c= 00 20 49 0470 TABLE -BY 0 $20 $49 $20 $76 $20 S9F $20 ;ADDRESS 
TABLE FOR 


014F- 20 76 20 

0152- 9F 20 

0154- DB 20 11 0480 -BY $DB $20 $11 $21.$52 $21 $86 $21 ; 
SPEECH DICTIONARY 

OLS7— 21 52) 21 

O15A- 86 21 

015C- B7 21 DA 0490 - BY $B7 $21 SDA $21 $16 $22 $36 $22 

OUSR= 2. 6 22 

0162- 36 22 

0164- 61 22 8E 0500 -BY S61 $22 $8E $22 SB5 $22 $D0 $22 S$FD $22 

O67 = 22 B5' 22 


March, 1981. Issue 10. 


COMPUTE! 


149 


The SP-1 utilities can be used for many other 
purposes. A great deal of information and some 
references concerned with speech synthesis using 
Linear Predictive Coding techniques are given in the 
literature supplied with the kit. With this material, 
you can make your KIM as talkative as you wish! 


O16A- DO 22 FD 
O16D- 22 
0510 -EN 


LABEL FILE: { / = EXTERNAL ] 


/ADLO=000A /ADHI=000B /SPNT=0002 
/GETBYT=1F9D /FPNT=0004 /SPINIT=0200 
/OUTSPE=02D0 BEGIN=0100 LOOP=011A 
PAUSE=012D SAY=0131 SPEAK=013E 
SP1=013F TABLE=014C 
//0000;,016E;016E 


Footnotes 

1, Speak and Spell is a trademark of Texas Instruments, Inc. 
VIDEO PLUS is a trademark of The Computerist, Inc. 

2. East Coast Micro Products, 1307 Beltram Ct., Odenton, 
Md. 21113. 


3. See 6502 User Notes, No. 13, p. 16 for information about 
adding a 6522 I/O board. 

4. See MICRO, No. 17, pp. 27-39 for a general description of 
the 6522. (o 


AIM Hardware — Software 
KIM by 
SYM MicroMate 


ColorMate 
Add color graphics to your computer 
system. 6847-based design. Prices 
start at $50.00. 


@ FirstMate 
Makes prototyping and experimenting 
a snap. Recommended for students 
and pros alike. Assembled and tested 
... $87.50 


@ ROM Bank SwitchMate (SYM) 
Expand your ROM space. Switch under 
manual or software control. Assembled 
and tested .. . $45.00 


@ PrograMate (SYM) 
Convert your SYM into a PROM pro- 
grammer for 1k (2758), 2k (2716) and 4k 
(2532, Tl pinout) UVPROMs. Hardware 
and software . . . $55.00 


@ Write for details to: MicroMate 
(Mention this ad and P.O. Box 50111 
save 5% on first order.) Indianapolis, IN 

46256 


6502 FORTH 


6502 FORTH is a complete programming system which 
contains an interpreter/compiler as well as an 
assembler and editor. 

6502 FORTH runs on a KIM-1 with a serial terminal. 
(Terminal should be at least 64 chr. wide) 

All terminal I/O is funnelled through a jump table near 
the beginning of the software and can easily be 
changed to jump to user written I/O drivers. 

6502 FORTH uses cassette for the system mass storage 
device 

Cassette read/write routines are built in (includes 
Hypertape). 

92 op-words are built into the standard vocabulary. 

Excellent machine language interface. 

6502 FORTH as user extensible. 

6502 FORTH is a true implementation of forth according 
to the criteria set down by the forth interest 
group. 

Specialized vocabularies can be developed for specific 
applications. 

6502 FORTH resides in 8K of RAM starting at $2000 and 
can operate with as little as 4K of additional 
contiguous RAM. 


Dearne Te EDT Be TEE 


6502 FORTH PRICE LIST 
KIM CASSETTE, USER MANUAL, AND 
COMPLETE ANNOTATED SOURCE 
LISTING $90.00 
($2000 VERSION) PLUSS&H 4.00 
USER MANUAL (CREDITABLE 
TOWARDS SOFTWARE 


PURCHASE) $15.00 


PLUS S&H _ 1.50 
SEND A S.A.S.E. FOR A FORTH 
BIBLIOGRAPHY AND A COM- 
PLETE LIST OF 6502 SOFTWARE, 
EPROM FIRMWARE (FOR KIM, 
SUPERKIM, AIM, SYM, and 
APPLE) AND 6502 DESIGN 
CONSULTING SERVICES 
AVAILABLE 


Eric Rehnke 
1067 Jadestone Lane 
Corona, CA 97120 


Now Available For 
KIM, AIM, And SYM 


150 COMPUTE! 


March, 1981. Issue 10. 


Expanding 
KIM-Style 
6502 Single 
Board Hal Chamberlin 
Computers 


The Modified 
KIM Bus 


Part 3 of 3 


This leads us to a definition of the ‘‘Unbuffered 
Modified KIM Bus’’. KIM is part of the name since 
the bus is essentially what a KIM-1 single board 
computer presents on its expansion connector. 
““Modified’’ is part of the name because not all of 
the 44 signals on the expansion connector are actu- 
ally part of the bus. Those signals that are part of the 
bus are common to the SYM and AIM computers as 
well as the KIM and thus any of these machines may 
be plugged into the bus without modification. 

Figure 6 gives a signal listing for the bus. 
Signals marked with an * do not connect to the pro- 
cessor but do connect to all of the other boards in the 
system. Most of these have different specialized func- 
tions on the different processors anyway and are not 
generally useful in a bus oriented system. Note that 
RDY is one of the signals that is not bussed. All 
modern memories are quite fast enough to operate 
without wait states in 6502 systems and besides, the 
6502 will not wait during write cycles anyway. The 
lines marked (Reserved) are intended for future uses 
such as memory bank switching signals, etc. 

Note that although RAM R/W is listed as a 
signal (should go low during phase 2 of Write 
cycles), it should not be used by a bus interface 
board for general application. The reason is that an 
AIM.-65 printed circuit error makes it go low during 
read cycles rather than write cycles like it should. In 
any case, one should be able to design any kind of 
bus interface board using just AO - A15, DO - D7, 
R/W, PHASE 2, interrupt, and power voltages. The 
additional lines are really just convenience signals. 

Two of the signals are important only in KIM 
systems. DECODE ENABLE must go low whenever 
addresses between 0000 and 1FFF are on the bus in 
order to activate KIM’s on-board memory. VEC- 
TOR FETCH must go low whenever addresses bet- 
ween FFFA and FFFF are on the bus in order for 
the reset/interrupt vectors stored in the KIM monitor 


ROM’s to be active. Although it is probably best for 
the motherboard to generate these two signals, many 
expansion boards generate them anyway so that the 
bus motherboard can be omitted altogether in 
systems with just one expansion board. 

Note that direct memory access is not supported 
by the Modified KIM Bus because the address lines 
from the 6502 cannot be disabled. An approach to 
DMaA in those interfaces that need it, such as video 
displays and disk controllers, is to provide two-port 
memory on the interface board itself. The big advan- 
tage then is that DMA to or from the on-board 
memory can then proceed at very high speed without 
slowing the processor at all. A conventional DMA 
system, such as on S-100 systems, would stop the 
processor cold at data rates beyond a couple of hun- 
dred thousand bytes per second. 

Although +5 volts regulated is available on the 
bus, it is often preferable to use unregulated +8 and 
an on-board regulator to provide + 5 to the logic 
circuitry of expansion boards. Similarly, +16 
unregulated is available for generating +12 power 
needed by many memory chips. When negative 
voltages are needed such as for EPROM'’s or analog 
circuitry, they may be easily generated from the 
positive unregulated voltages with a charge-pump cir- 
cuit and then regulated with IC regulators. The 
primary advantages of on-board regulation are a 
smaller and less expensive central power supply and 
clean, well regulated power on the expansion board 
itself. The potential problem of additional heat 
dissipation on the expansion boards is nullified by 
the very low power consumption of modern LS IC’s. 


PIN KIM-1 SYM-1 AIM-65 MODIFIED 
E-1 SYNC SYNC SYNC ic 
£-2 DY RDY RDY 

PHASE 1 PHASE 1 PHASE 1 

TRO TRQ TRG 

SET OVERFLOW © SET OVERFLOW SET OVERFLOW 


NMI NMI 
RESET RESET 
DATA BUS DATA BUS 
DATA BUS DATA BUS 
DATA BUS 
BUS 
BUS 
BUS 
BUS 
BUS 


BUS 7 
BUS 6 
BUS 5 
BUS 
BUS 
BUS 
BUS 
BUS 


7 
6 
5 
4 
3 
2 
1 
0 


POWER ON F 


(N.C.) 
(N.C. ) (N.c.) 
+5 VOLT REG. © +5 VOLT REG. +5 VOLT REG. +5 VOLT REG. 
GROUND GROUND GROUND GROUND 
ADDR BUS 0 ADDR BUS 0 ADDR BUS 0 ADDR BUS 0 
ADDR BUS 1 ADDR BUS 1 ADDR BUS 1 ADDR BUS 1 
ADDR BUS 2 ADDR BUS 2 ADDR BUS 2 ADDR BUS 2 
ADDR BUS 3 ADDR BUS 3 ADDR BUS 3 ADDR BUS 3 
ADDR BUS 4 ADDR BUS 4 ADDR BUS 4 ADDR BUS 4 
ADDR BUS 5 ADDR BUS 5 ADDR BUS 5 ADDR BUS 5 
ADDR BUS 6 ADDR BUS 6 ADDR BUS 6 ADDR BUS 6 
ADDR BUS 7 ADDR BUS 7 ADDR BUS 7 ADDR BUS 7 
ADDR BUS 6 ADDR BUS 8 ADDR BUS 8 ADDR BUS 8 
ADDR BUS 9 ADDR BUS 9 ADDR BUS 9 ADDR BUS 9 
ADDR BUS 10 ADDR BUS 10 ADDR BUS 10 ADDR BUS 10 
ADDR BUS 11 ADDR BUS 11 ADDR BUS 11 ADDR BUS 11 
ADDR BUS 12 ADDR BUS 12 ADDR BUS 12 ADDR BUS 12 
ADDR BUS 13 ADDR BUS 13 ADDR BUS 13 ADDR BUS 13 
E. ADDR BUS 14 ADDR BUS 14 ADDR BUS 14 ADDR BUS 14 
E. ADDR BUS 15 ADDR BUS 15 ADDR BUS 15 ADDR BUS 15 
E PHASE_2 PHASE_2 PHASE_2 PHASE_2 
E. READ/WRITE READ/WRITE READ/WRITE READ/WRITE 
E READ/WRITE READ/WRITE READ/WRITE READ/WRITE 
E-X PLL TEST AUDIO TEST AUDIO TEST © 416 VOLT UNREG. 
E-Y PHASE 2 PHASE 2 PHASE 2 2 
E-2 RAM R/W RAM B/W @ RAM B/W Ry 
* These signals are bussed to 
@ Signal generated ts and 


Fig. 6 Processor and Modified Expansion Bus Signals © 
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Progressive Computer Software 


BOX 120 
ALLAMUCHY, N.J. 07820 


inc. 


201-362-6574 


HUDSON DIGITAL ELECTRONICS INC. 


THE TASK* MASTERS 


HDE supports the *TIM, AIM, SYM and KIM (TASK) with a growing line of computer programs and 
peripheral components. All HDE component boards are state-of-the-art 4%” x 6%”, with on board 
regulation of all required voltages, fully compatible with the KIM-4 bus. 


OMNIDISK 65/8 and 65/5 

Single and dual drive 8” and 5%” disk systems. 
Complete, ready to plug in, bootstrap and run. 
Include HDE’s proprietary operating system, 
FODS (File Oriented Disk System). From $795.00. 


DM816-M8A 

An 8K static RAM board tested for a minimum of 
100 hours and warranted for a full 6 months. 
$195.00 


DM816-UB1 

A prototyping card with on-board 5V regulator 
and address selection. You add the application. 
$49.50 


DM816-P8 

A 4/8K EPROM card for 2708 or 2716 circuits. 
On board regulation of all required voltages. 
Supplied without EPROMS. $165.00 


DM816-CC15 

A 15 position motherboard mounted in a 19” 
RETMA standard card cage, with power supply. 
KIM, AIM and SYM versions. $545.00 


DISK PROGRAM LIBRARY 

Offers exchange of user contributed routines 
and programs for HDE Disk Systems. Contact 
Progressive Computer Software, Inc. for details. 


ORDER FROM THESE FINE DEALERS: 


Johnson computers 
405 Corbin Road Box 523 
York, PA 17403 Medina, Ohio 44256 
(717) 845-4954 (216) 725-4560 
Lux Associates A-B Computers 
20 Sunland Drive 115-B E. Stump Road 
Chico, CA 95926 


(916) 343-5033 (215) 699-5826 


Montgomeryille, PA 18936 


HDE DISK BASIC 

A full range disk BASIC for KIM based systems. 
Includes PRINT USING, IF... THEN... ELSE. 
Sequential and random file access and much 
more. $175.00 


HDE ADVANCED INTERACTIVE 
DISASSEMBLER (AID) 

Two pass disassembler assigns labels and con- 
structs source files for any object program. 
Saves multiple files to disk. TIM, AIM, SYM, KIM 
versions. $95.00 


HDE ASSEMBLER 

Advanced, two pass assembler with standard 
mnemonics. KIM, TIM, SYM and KIM cassette 
versions. $75.00 ($80.00 cassette) 


HDE TEXT OUTPUT PROCESSING SYSTEM 
(TOPS) 

A comprehensive text processor with over 30 
commands to format and output letters, docu- 
ments, manuscripts. KIM, TIM and KIM cassette 
versions. $135.00 ($142.50 cassette) 


HDE DYNAMIC DEBUGGING TOOL (DDT) 
Built in assembler/disassembler with program 
controlled single step and dynamic breakpoint 
entry/deletion. TIM, AIM, SYM, KIM AND KIM 
cassette versions. $65.00 ($68.50 cassette) 


HDE COMPREHENSIVE MEMORY TEST 
(CMT) 

Eight separate diagnostic routines for both 
static and dynamic memory. TIM, AIM, SYM, 
KIM and KIM cassette versions. $65.00 ($68.50 
cassette) 


Falk-Baker Associates 
382 Franklin Avenue . 

Nutley, NJ 07110 Miller Place, NY 11764 

(201) 661-2430 (516) 744-6462 

Laboratory Microcomputer Consultants 
P.O. Box 84 
East Amherst, NY 14051 
(716) 689-7344 


Ear Peripherals 
P.O. Box 924 
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Cassette 1/O 
With 
AIM 65 BASIC 


Michael Rathbun 
Polar Solutions 
Kodiak, Alaska 


The AIM 65 is one of the few micro systems I have 
worked with which was packed with PLEASANT 
surprises. Its monitor, assembler, and BASIC do 
things I didn’t expect from a piece of equipment in 
its price range. After a while, however, I found 
myself wishing that the excellent AIM cassette 
system could be used with the BASIC on the system 
for data input and output, instead of just for SAVE 
and LOAD. It turns out that, because BASIC uses 
certain monitor routines to interface the keyboard 
and display/printer, BASIC cassette file I/O is not all 
that difficult. 


Monitor Routines 

For those who haven’t spent an exciting evening or 
two reading the assembly listing of the monitor which 
Rockwell provides, here is a brief summary of the 
I/O routines which BASIC uses. 

Most of the AIM 65 functions which get data 
from the keyboard (i.e. Editor, BASIC, and even 
Assembler) do so by calling a monitor routine called 
INALL. INALL, however, is not just for accessing 
the keyboard. It will get a byte of data from ANY in- 
put device. Which device it goes to is determined by 
the contents of a memory location labelled INFLG, 
which is located at $A412. If this location contains a 
RETURN character ($OD) then the input will be 
from the keyboard. If INFLG contains an ASCII 
“*T”’ (54), then INALL will look to the cassettes for 
data. 

How does this location come to contain the pro- 
per value? The functions which allow a selection of 
input devices also make use of a subroutine from the 
monitor called WHERE]; it is this subroutine which 
displays the familiar ‘‘IN =’’ prompting message 
after the BASIC LOAD command is entered. If you 
respond to “IN =”’ with ‘‘T’’, the WHEREI routine 
then also asks for a file name (‘‘F =’’) and then finds 
out which cassette you will use (‘‘T =’’). From this 
time on, any time INALL is called, a byte of data 
from the specified tape file will be returned. 

Output works in a similar fashion; there is a 
subroutine called OUTALL which will output a byte 
of data to any AIM 65 output device, depending on 
the contents of a location labelled OUTFLG, which 
is located at $A413. This location is set to the desired 


value by a subroutine called WHEREO, which is the 
one which generates the ‘‘OUT =’’ prompt. 


Utilization 

Making your BASIC programs read from cassettes is 
quite simple--most of the work has been done for you 
by the program logic used by the LOAD command. 
When you type LOAD and give the cassette file in- 
formation, BASIC simply takes its input data from 
the tapes instead of from the keyboard, continuing to 
do this until a CONTROL Z character ($1A) is read 
from the tape. The CONTROL Z causes control to 
return to the keyboard. If your program contains a 
step with the LOAD command (for example, 100 
LOAD) then when this step is executed, you will see 
the ‘IN =”’ message. If you specify input from a 
cassette file, then from that point on, until a CON- 
TROL Z is read, or until INFLG is changed to a 
RETURN character, every INPUT statement in 
your program will take data from the tapes instead of 
from the keyboard. 

When you reach a point in your program when 
you wish to switch input back to keyboard, simply 
POKE a RETURN into INFLG. If you want to in- 
termix INPUTs from keyboard and tape, you can 
change the input device back and forth at any time 
by changing the contents of INFLG. Remember, 
though, that if your program bombs with an error 
while INFLG points to the tapes, the system will go 
on trying to get its data from the tape file; you will 
have to use the RESET button to regain control of 
the situation. 

For writing data to cassettes, the procedure is a 
little more complex; there is no BASIC command 
which will change OUTFLG. The SAVE command 
will access the tapes, all right, but all it does is LIST 
the program and return to keyboard control. 
However, this sequence of steps will work: 

1. POKE the address of the WHEREO routine into locations 
4 and 5. 

2. Execute a USR(X) statement. This will cause BASIC to call 
WHEREO. 

3. Output data is required using regular PRINT statements. 
4. When output is finished, you will need to close the file 
properly. Do this by PRINTING CHR$(13) and CHR$(26). 
This puts an AIM Editor end-of-file mark on the tape, fol- 
lowed by a CONTROL Z, just to be safe. Then POKE the 
address of the routine called DU11 (see table of locations) into 
locations 4 and 5, and execute a USR(X) statement. This will 
end the cassette file properly, and also will restore output to 
the display. 

Notes and Cautions 

If the OUTFLG is set to send output to tapes, and 
your program bombs with an error message for some 
reason, you will never see the error message — it 
will have been written to tape! For this reason, it is a 
good idea to debug programs using regular keyboard 
input and display output before using cassettes; also, 
it might be wise to ‘‘turn off’’ the cassettes when not 
actually reading or writing, by POKEing a 
RETURN into INFLG or OUTFELG after a state- 
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ment which accesses tape. This allows you to inter- 
mix keyboard-display and cassette operation. 

You can use both input and output in the same 
program, but unfortunately, NOT AT THE SAME 
TIME. The reason for this restriction is as follows: 
the monitor cassette routines store data on tape in 
80-byte blocks. The data going to or from a block on 
tape is stored temporarily in a buffer area in 
memory. If INFLG and OUTFLG are both ‘‘T”’, 
then the cassette write routine uses a different buffer 
from that used by the read routine. This buffer is 
located on page zero, right in the middle of the area 
BASIC uses for its math operations. Therefore, if the 
same program is going to do both reading and 
writing, it must finish completely with one operation 
before it initializes the other. A procedure which 
eliminates this restriction (but requires assembly- 
language routines and some memory overhead) was 
reported in the first issue of Rockwell’s new publica- 
tion INTERACTIVE. The method used here is con- 
siderably simpler, but limits you to read-only or 
write-only at any given instant. 

Sample Programs 

The two sample programs were developed to fill a 
need in a project I was working on. The first writes a 
table of about 600 prime numbers to tape; the second 
program reads this table from tape into an integer 
array, and uses this array to print the factors of a 


WANT YOUR COMPUTER BACK? 


™ 
Let the MICROsport Microcomputer (MMC) take over any 
dedicated task. 


It is the affordable alternative — kits from $89.00, application 
units from only $119.00 (assembled and tested). 


It is user-oriented — complete in-circuit emulation allows pro- 
gram development on ANY 6502 based system. It is compact 
(4%” x 6%” pc board) but powerful (32 I/O lines; 20 mA full 
duplex, IK RAM + EPROM socket 4/16 bit counters; 6503 
CPU) and works off any AC or DC power supply. 


Turn your present 6502 based system into a complete develop- 
ment system with: 


1 MMC/03D Microcomputer with ZIF sockets 
1 MMC/031CE In-circuit emulator for the 6503 CPU 
1 MMC/03EPA EPROM Programmer complete with software 
driver. 


For more info call or write 


R. J. BRACHMAN ASSOCIATES, INC. 
P.O. Box 1077 
Havertown, PA 19083 
(215) 622-5495 


number entered from the keyboard. While not 
elegant examples of the programmer’s art, they do 
show the implementation of the procedures detailed 
here. 


Location Table 
Label Hex Decimal 
INFLG A412 42002 
OUTFLG A413 42003 
WHEREI E848 59464 
Low byte = 72 
High byte = 232 
WHEREO E871 59505 


Function 


Defines input device 
Defines output device 
Initialize INFLG 


Initialize OUTFLG 


Low byte = 113 
High byte = 232 
DU11 E50A 58634 Close active tape file 


Low byte = 10 
High byte = 229 


List 
0 REM SET UP OUTPUT TAPE FILE. 
1 POKE 4,113: POKE 5,232 
2 N =USR(N) 
5 UL =600: REM DEFINE TABLE LIMIT HERE 
10 DIM X%(UL) 
20 X%(1) =2: X%(2) =3 
30 L=2 
90 N=3 
100 I=1 
110 IF INT(N/X%(I)< >N/X%(1) THEN 200 
120 N=N + 2 GOTO 100 
200 IF X%(I) = >SQR(N) THEN 300 
210 [=1+1: GOTO 110 
300 L=L+1: X%(L)=N 
309 REM OUTPUT TO TAPE. 
310 PRINT N 
314 REM ALSO SHOW NUMBER ON DISPLAY. 
315 POKE 42003,13: PRINT N: POKE 42003,ASC(‘‘T) 
320 IF L< >UL THEN N =N +2: GOTO100 
321 REM 
329 REM WRITE END-OF-FILE MARK ON TAPE 
330 PRINT CHR$(13); CHR$(26) 
331 REM 
339 REM CLOSE TAPE WITH DU11 ROUTINE. 
340 POKE 4,10: POKE 5,229 
350 N =USR(N) 
360 PRINT‘ DONE.”’ 
10 DIM A%(600) 
20 A%(1) =2 
90 REM SET UP TAPE INPUT. 
100 LOAD 
115 REM READ DATA FROM TAPE TO ARRAY. 
120 FOR 1 =2 TO 597: INPUT A%(I): NEXT 
125 REM TURN OFF TAPE. 
130 POKE 42002,13 
200 INPUT X 
205: PRINT! ***42X 
210 Q=1 
220 IF INT(X/A%(Q) = X/A%(Q) THEN 230 
225 Q=Q +1: GOTO 240 
230 PRINT! A%(Q): X =A/A%(Q) 
240 IF SQR(X) = >A%(Q) THEN 220 
250 PRINT! X: GOTO 200 o} 
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Commodore 
Business 
Machines 
Announces 
Availability Of 
lhe ga Relief 
Plan Application 
Program 


Commodore Business Machines, a 
Division of Commodare Interna- 
tional Limited has announced the 
availability of a disaster/emergency 
plan computer application program. 

As a result of the Commodore 
experiences during the COMDEX 
80 exposition and the tragic fire at 
the MGM Grand Hotel in Las 
Vegas, November 22, 1980, the 
striking need for immediate informa- 
tion dissemination on the where- 
abouts and status of the hotel guests 
and employees was apparent. With 
the consent and encouragement of 
Commodore’s Vice Chairman and 
Chief Executive Officer, Mr. Jack 
Tramiel, Commodore removed 
seven complete computer systems 
from the COMDEX booth and 
established a computer command 
center. 

Marge Jillett, Director of Public 
Relations recruited volunteers to 
man the command center until three 
a.m., Sunday, November 24, 1980. 
Brian Padol, representing Micro 
Search, Inc. adapted a Commodore 
information list management system 
program to allow volunteers to type 
the name, address, MGM room 
number and the site of relocation of 
the thousands of guests. Lists were 
compiled, printed and distributed 
throughout the night. 

Lieutenant Ross of the Las 
Vegas Metropolitan Police Depart- 
ment stated ‘‘We were not equipped 


to handle a disaster of this mag- 
nitude without the computers and 
personnel’. The Commodore ‘‘com- 
mand center’ became a vital infor- 
mation source for the police, the fire 
department, Red Cross and other 
disaster relief organizations. 

Commodore Business Machines 
Inc. will release to its over 500 
dealers this disaster relief program 
and document its experiences so that 
should an emergency of this mag- 
nitude occur again, the Commodore 
dealer can assist all local disaster 
relief organizations within their area, 
in the continuing concern to assist 
the public. 


New Product releases are 
selected from submissions for 
reasons of timeliness, available 
Space, and general interest to 
our readers. We regret that we 
are unable to select all new 
product submissions for 
publication. Readers should be 
aware that we present here some 
edited version of material 
submitted by vendors and are 
unable to vouch for its accuracy 
at time of publication. 


Chess And 
Checkers 
Programs For 
Atari Personal 
Computers 


SUNNYVALE, CA — January 
22, 1981 — Personal Software Inc. 
has introduced MicroChess™ and 
Checker King™ for the Atari ™ 
400 and 800 personal computers. 

The MicroChess program 
turns a computer display screen in- 
to a chess board, and is the in- 
dustry’s first ‘‘gold cassette’’ soft- 
ware product with sales over $1 
million. The board and all its 
pieces are illustrated in high- 
resolution color graphics. 

MicroChess has eight levels of 
play, and lets the player pick the 
appropriate ability level. 
MicroChess plays by tournament 
rules and allows no illegal moves, 
making the program an excellent 
chess teacher. 

Checker King brings the 
popular game of checkers to Atari 
home computers. The program 
turns the computer display screen 
into a colorful checkerboard, where 
all pieces are — like MicroChess 
— illustrated using high-resolution 
graphics. 

Checker King allows single, 
double and triple jumps, forces 
jumps and performs according to 
the tournament rules of checkers. 
And, again like MicroChess, 
Checker King allows no illegal 
moves at any of its eight levels of 
play. 

In both Atari versions of 
MicroChess and Checker King, 
tournament excitement is generated 
by an on-screen, real-time clock 
that ticks off the seconds while the 
player and the computer ponder 
the next move. 
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PRINTER & AN gear he 


TYPEWRITER 


IT’S A DAISYWHEEL COMPUTER ORI 


.. UNLESS YOUR 
PRINTER & YOUR 
SOFTWARE ARE 
TOTALLY 
\ COMPATIBLE 


The TYPRINTER 221° 


Is a a TYPEWRITER QUALITY, DAISYWHEEL PRINTER that is Totally Compatible with 


All Word Processors. That’s because the TYPEPRINTER 221 may be PROGRAMMED 
in PLAIN ENGLISH, Imbedded within The Text File of All Word Processing Software! 


Use the 221 as your... 


Electronic Typewriter 
When not being used as a Computer 


Printer, the 221 becomes a fully functional 


Electronic Typewriter. 


Stand Alone Terminal 
Available options allow the 221 to 
Communicate with Distant Computer 
or Information Services such as Source, 
Micronet & others. 


Additional Options 
4K or 16K RAM Memory which can be used as INPUT or OUTPUT 
Buffers. Also use as an Automatic Spooler to your computer. Bi-Directional 
Communicatons from The 221 to your Pet, Apple or TRS-80. Nothing else 
to buy. Lawyers, Accountants and others will find our Automatic Strike-Out 
Type and High Density Spacing options very useful. 


Computer Printer 
It's a Daisywheel Computer 
Printer with more standard features 
and available options than any other machine. 


Tele-Communications Terminal 


Option available to allow your 
221 to access the Teletype & 
Telenex networks. 
Telex & Teletype are registered trademarks. 


Built-in Features 
The 221 Centers Copy Automatically, Sets Columns, Prints in Reverse, 
Bold Face and Underlines Automatically. The 221 also Justifies Right, 
Types in Three Pitches and does Proportional Spacing. It Types in 
Spanish, French, German, Italian and rupee as well as English. 
And much, much more! 


Call 714/778-3443 for the distributor in your area. 


HOWARD INDUSTRIES 


Copyright 1980, by Howard Industries, Inc. 


2031 E. Cerritos Ave. 7K 
Anaheim, California 92806 
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Both MicroChess and Checker 
King for the Atari are available on 
cassette for Atari 400 and 800 per- 
sonal computers and both require 
8K bytes of memory. MicroChess 
was written by Peter Jennings; 
Checker king is by Michael Marks. 

For more information, please 
contact Jeff Walden, Personal Soft- 
ware, Inc., 1330 Bordeaux Drive, 
Sunnyvale, CA 94086. 


Atari, Atari 400 and Atari 800 are registered trademarks ¢ 
Atari, Inc. MicroChess and Checker King are tra 
Personal Software Inc. 


Cimarron 
Announces An 
Attorney Package 
For Commodore’s 
8032 Business 
Computer 


Real Estate 
Analyzer 


A new edition of the ‘REAL 
ESTATE ANALYZER by 
HowardSoft”’ is now available for 
Apple Computers. This software 
package is unique in its realistic 
handling of TODAY’S market con- 
ditions for real estate investments: 
creative financing, negative cash 
flows, component depreciation, 
high property inflation, rent con- 
trol, property tax limitations, high 
returns on near-term income, and 
inflationary increases in operating 
expenses. 

The software provides projec- 
tions of annual cash flows and on- 
sale return-on-investment, as well 
as several other measures of pro- 
fitability, including all the conse- 
quences of ordinary and capital 
gains taxes as well as inflation. 
Data for your properties are easily 
filed on disk for later retrieval and 
alteration. Results are displayed on 
the video screen or printed with a 
line printer in a flexible report for- 
mat with complete itemized tables. 
The package comes with two disks 
and a detailed instruction manual 
in a quality notebook, complete 
with explanations of the principles 
of investment analysis. More com- 
plete and realistic than packages 
costing many times more, this pro- 
duct sells for $99 at dealers 
everywhere. (Requires Apple Com- 
puter with 48K, Applesoft ROM, 
and disk drive.) HOWARD 
SOFTWARE SERVICES, 7722 
Hosford Avenue, Los Angeles, CA 
90045, (213) 645-4069. 


Costa Mesa, CA./ Cimarron Cor- 
poration has announced a major 
applications package programmed 
exclusively for the legal profession. 
Incorporating both accounts 
receivable and matter tracking, 
Legal Time Accounting (LTA) of- 
fers law firms with an inexpensive 
solution to the problems of man- 
aging the daily flow of words and 
information. 

LTA proceduralizes daily 
operations by logging each activity 
e.g., conference, telephone time, 
etc., then stores this data by matter 
and lawyer. The resultant data 
provides for control of receivables, 
tracking of attorney activity and 
revenue and tracking of client and 
matter activities — all with daily 
and monthly totals. Reports in- 
clude aging analysis, attorney bill- 
ings with ratios, client billings with 
ratios, activity code analysis and a 
daily charges and payments jour- 
nal. Statements can be generated 
twice monthly allowing for more 
predictable cash flow. General 
ledger and accounts payable are 
also available. 

LTA is programmed 
specifically for the Commodore 
8032 computer system utilizing 
either the 4040 or 8050 twin 
diskette drives. Compatible printers 
are the NEC Spinwiter or C. Itoh’s 
Starwriter. Both printers allow for 
printing of fully formed characters 
so that the popular WordPro word 
processing program can be used in 
conjunction with LTA. In its full 
hardware configuration, an 
automatic sheet feeder is added 
providing for continuous, hands-off 
operation. 

According to Michael C. 
Miller, developer of LTA and co- 
founder of Cimarron, the advanced 
design of the program represents 


the first time high quality applica- 
tions software created for minicom- 
puters has been made available on 
the now more powerful Com- 
modore business computer. 

LTA is priced at $900.00 per 
copy and includes documentation 
and support materials. For high 
volume dealers, Cimarron will offer 
a one time charge. Additionally, 
Cimarron will pre-package and 
fully test the entire system for those 
dealers wishing turnkey installa- 
tion. Sales and program training 
are also available. 

For more information, please 
contact Daniel M. Gomez, Cimar- 
ron Corporation, 600 Baker Street, 
Suite 319, Costa Mesa, CA 92626. 
(714) 641-1156 


Apartment 
Management Soft- 
ware Package 


Norcross, Georgia — MIN 
Microcomputer Software, Inc., has 
announced The Landlord™, an 
apartment management software 
package for Apple II® computers. 
The system can be used by apart- 
ment properties of up to 400 units. 

The Landlord™ provides pro- 
perty owners and managers with 
listings of apartments, residents, 
and past residents, as well as 
reports on vacancies, lease expira- 
tions, intents to vacate, and resi- 
dent payments. Records of 
disbursements and other financial 
transactions are maintained by the 
system and a monthly property 
analysis statement is produced. 

The Landlord™ allows entry 
of resident charges and payments 
using up to 26 different account 
codes. Security and pet deposits, 
returned checks, and overpayments 
are also handled by the system. An 
outstanding balance report allows 
expedient follow-up of delinquent 
residents. 

The package is designed to be 
used by managers who have no 
prior computer or data processing 
experience. The manual included 
with The Landlord™ as well as the 
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SOFTWARE CITY 


presenting the LARGEST SELECTION OF SOFTWARE EVER ASSEMBLED... 


~~ 


and other Microcomputers 


for ATARI® ¢ APPLE® e PET® @e 
at SUPER DISCOUNT PRICES! 
ATARI QUALITY SOFTWARE 
PHYSICS (AT) prema apaaee) BAGO 6502 DISASSEMBLER (AT) 
GREAT CLASSICS (AT) .. 24.50 ASTRO APPLE (AP)... 
BASIC PHYSCOLOGY (AT) 24.50 ASTRO APPLE (AP) [D] . 
PRINCIPLES OF ECONOMICS ASTEROIDS IN SPACE [0] 


(AT) 


SPELLING (AT) 
BASIC ELECTRICTITY 

BASIC ALGEBRA (AT) 
8K RAM MODULE (AT) 


(AT) 


16K RAM MODULE (AT) .. 
KINGDOM _(AT) 
LEMONADE (AT) 
STATISTICS! (AT) .. 
BLACKJACK (AT)... 
BIORYTHM (AT)... 
HANGMAN (AT)... 


SPACE INVADERS (AT) ... 
EUROPEAN CAPITALS _(AT) 
MORTGAGE LOAN (AT)... 
STATES & CAPITALS (AT) 
EDUCATION SYSTEM (AT). 
ATARI BASIC (AT) ...... 
ASSEMBLER DEBUG (AT) . 
BASKETBALL (AT) ...... 
VIDEO EASEL-LIFE (AT) 
SUPER BREAKOUT (AT) .. 
MUSIC COMPOSER (AT) . 
COMPUTER CHESS (AT) .. 
3-D TIC TAC TOE (AT) 
STAR RAIDERS (AT) . 
TELELINK (AT) 
PADDLES (AT) . 
JOYSTICKS (AT)... 
U.S. HISTORY (AT) .....- 
U.S. GOVERNMENT (AT) .. 
SUPERVISERY SKILLS (AT) 
WORLD HISTORY (AT) _. 
BASIC SOCIOLOGY (AT) . 


ADVENTURE INTERNATIONAL 
ADVENTURE HINT SHEET .. 37.95 
ADVENTURE (1.2.3) [D] (A\ 
ADVENTURE (4.5.6) [0] (AP).. 
ADVENTURE (7.8.9) [D] (AP).. 
ADVENTURE #10 [D] . 
ADVENTURE (specify 1-10) (AP). . 
PLANETOIDS "ASTEROIDS" [D] (AP) . 
PLANETOIDS "ASTEROIDS" (AP) . . 
POKER (AP). 5 
POKER (AP) (O]” 
KID VENTURE #1 (AP) 


AVALON ILL 
MIDWAY (P,AP). 
NUKE WAR (PAP) - 
PLANET MINERS. (P.AP) 
CONVOY RAIDER (P.AP) . 

B1 BOMBER (PAP) .. 
LORDS OF KARMA (P,AP) - 


AUTOMATED SIMULATION 
TUESDAY QUARTERBACK [0] (AP) 
STAR WARRIOR [C.D] (AP) 
THREE PACK [D] (AP.P) .. 
STARFLEET ORION [C.D] (AP) 
STARFLEET ORION [C] (P) . . 
INVASION ORION [C.D] (AP) - 
INVASION ORION [Cj (P) .. « 
APSHAI (D] (AP)... 
APSHAI [C] (P) . 
RYN [D.C] (AP) - 
RYN [C) (P) .... eee 
MORLOC [C.0j (AP) 
MORLOC [Cj (P).... 
RIGEL [C.D] (AP) 
RIGEL [C] (P).. 
HELLFIRE [D] (AP) 
HELLFIRE [C] (P) 


BSSGG5 


Check program desired. 
Complete ordering information 
and mail entire ad. 

Immediate Shipments from stock. 


KEY: 
AT-Atari 
AP-Apple 
P-Pet 
D-on Disc. 


C-Cassette 


If not marked-Cassette 


ATARI is a trademark of ATARI INC. 
APPLE is a trademark of APPLE COMPUTER. INC. 
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XN Prices subject to change without notice. 


PET is a trademark of COMMODORE BUSINESS MACHINES. 


(AP) 
ATARI ASSEMBLER . 
BABBLE (AP)... 
BABBLE (AP) [D] . . 
BATTLESHIP COMMANDER (AP) .. 
BATTLESHIP COMMANDER [D] (AP) . 
BENEATH APPLE MANOR (AP) ... 
BENEATH APPLE MANOR (AP) [0] 
FASTGAMMON  [D] (AP) . 
FASTGAMMON _[AP.AT) 
FORTH (O} (AT) .. 
FRACAS ADVENTURE 
FRACAS ADVENTURE 
LINKER (AP) [D] 
TANK TRAP (AT). . 
TANK TRAP (AT) | (O} 
TARITREK (AT) . 
TARI TREK (AT) 


PERSONAL SOFTWARE 
CCADATAMGMT [D] (AP) . 
DESKTOP PLAN [D] (AP) 
GAMMON GAMBLER (AP)... 
GAMMON GAMBLER [D] (AP) 
MONTY MONOPOLY [D} (AP) 
VISICALC [D] (AP)... 
VISICALC [D} (AT,P) 


INSTANT SOFTWARE 
AIR FLIGHT SIMULATION (P,AP) 
APPLE FUN (D] (AP) ae 
CASINO (P)..... 
MORTGAGE (P) ...... 
PADDLE FUN [D] (AP) . 
PENNY ARCADE (P) 
PET UTILITY (P) .. 
QUBIC 4/GOMOKU 


13) 


WARY ct 
{D] (AP). 
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(P) 


SAHARA WARRIOR 
SKY BOMBERS (AP) 
SPACE WARS (AP) 
SUPERSHOOTERS ( 
TREK-X (P) 


STRATEGIC SIMULATIONS 
COMPUTER AMBUSH [D]_ (AP) 


COMPUTER BISMARCK [D] (AP) 
COMPUTER CONFLICT [D] (AP). 


(AP) . 
{0} 


Oooocooc0e000000 


COMPUTER QUARTERBACK | 
AIR COMBAT [0] (AP) . 
WARP FACTOR [0] (AP) 


‘SUB-LOGIC 
3D GRAPHICS (AP) .... 
3D GRAPHICS [0] (AP)... 2. 
A2-FS1 FLIGHT SIMULATOR (AP) . 
A2-FS1 FLIGHT [D] (AP) .... 


MICROSOFT SOFTWARE 
O ADVENTURE [D] (AP) 
1D OLYMPIC DECATHALON [0] 
O TYPING TUTOR (AP) [0] 
o 
a 


ooooco00 


gooo 


TYPING TUTOR (AP)... 
Z-B0SOFTCARD [D] (AP) . 


If you don’t see it listed, write: 


SANTA PARAVIA FIUMACCIO’ (AP.P)": 
SANTA PARAVIA FIUMACCIO. (APIO) nae 


COMPUTER NAPOLEONICS|D](AP) ..: 
(AP). 


(apy tt 


ON LINE SYSTEMS 
CD HI-RES ADVEN. #0 (AP) [D] .. 17.95 
HI-RES ADVEN. #1 [D] (AP) 50 
G HI-RES ADVEN. #2 [D} (AP) .. 00 
OG HI-RES FOOTBALL #1 [D] (AP) 
O HI-RES CRIBAGGE [0] (AP).. 
1D PADDLE GRAPHICS [D] (AP) . 
O TABLET GRAPHICS [D] (AP) . 

SIRIUS 
OO CYBERSTRIKE [D] (AP) . 36,00 
G STARCAUISER [D] (AP) 22.50 
O BOTH BARRELS [D] (AP) 22.50 
G PHANTOMFIVE [D] (AP). 36.00 
SYNERGISTIC SOFTWARE 
1 DUNGEON & WILDERNESS [0] (AP) . . . 2900 
DUNGEON (AP) .. + 13.50 
O DUNGEON [0] (AP) . 15:75 
O ODYSSEY [0] (AP) 27.00 
O HIGHER GRAPHICS (0) 31.50 
O WILDERNESS (AP) 15.75 
D WILDERNESS [0] ( E 18.00 
BORDERBUND 

EMPIRE GALACTIC (AP) [D] . + 22.50 
O GALAXIAN (AP) [D] ....... > 2250 
CG HYPER HEADON (AP) [Dj]... 2 22.50 
G REVOLUTIONGALACTIC (AP) (0) .. 2250 
O TANK (AP) [D] ...... . 2 1355 
O TAWALA’S REDOUBT (AP) + 26.95 
CO TRADER GALACTIC (AP) [0] . + 2250 

MUSE GAIA 
O ABM [D] (AP) ....... 22.50 
O ADDRESS BOOK (AP) [Dj « 44,50 
O APPILOTII [D] (AP)... + 80.00 
O BEST OF MUSE (AP) [Dj + 35.95 
© GLOBALWAR (AP) [D] . + 2250 
O MATH-APPLESOFT (AP) " [0] + 35.95 
O SUPER TEXT Il (AP) [0] 135.00 
CO THREE MILE ISLAND (AP) + 35.95 
CO U-DRAWII (AP) [0] 35.95 
O THE VOICE (AP) [OD]... 35.95 

IRIDIS 
Qinioist (AT) .... 895 
GiRIDIS1 (AT) [0]. 11.75 
GIRIDIS2 (AT) .... 14.50 
OIRIDIS2 (AT) [Dj]... 2. 16.95 
EDU-WARE 
O COMPUREAD (AP) [D].......-++ 22.50 
GESP (AP) [D] ....... 1450 
© NETWORK (AP) [0] 217-95 
PRISONER (AP) [0] + 26.95 
D SPACE (AP) {0} + 26.95 
© SPACE II (AP) [0] + 2250 
O TERRORIST (AP) | : + 26.95 
PROGRAMMA 

1D MICRO INVADERS (AP) 
O EXPAND-A-PORT (AP)... 
D JOYSTICK (AP) . 
DTINYPASCAL (AP) [0] : 

0 SPACE WARS (APP) .... 
 WPSSTANDARD (AP) [Oj 117,00 
HAYDEN 
O SARGON! (AP) ... 25.00 
G SARGON II (AP) {Dj 30.00 
REVERSAL (AP) 25,00 


we probably have it in stock! 


len 


hip the above programs as checked to 
Mr./Mrs. 
Address =—— 
City 
State Zip 


Amount of order 


N.Y. residents add Sales Tax .... 


Number of Programs Ordered 


Add shipping anywhere in the U.S. 2.00 _ 
Total amour nclosed . 

Charge my O MasterCharge OF Visa 
Signature —__ = = 
Card No Expires 


“' SOFTWARE CITY 


a division of DigiByte Systems Corp. 


31 East 31st Street, New York, N.Y. 10016 © (212) 
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instructions that appear on the 
Apple’s® screen are completely 
non-technical in nature. 

Suggested retail price for The 
Landlord™ is $795.00. The soft- 
ware requires an Apple II® com- 
puter w/48K RAM, 2 disk drives, 
and either a Silentype® or Cen- 
tronics 779 printer. The Landlord’ 
™ will be sold exclusively through 
retail computer outlets. 

MIN Microcomputer Soft- 
ware, Inc. specializes in the 
development of software packages 
for specific small business applica- 
tions. 

For more information, please 
contact Art Nacht, MIN 
Microcomputer Software, Inc., 
5835-A Peachtree Corners East, 
Norcross, GA 30092. (404) 447-4322. 


‘The Landlord is a trademark of MIN Microcomputer Software, Inc 
Apple, Apple II, and Silentype are registered trademarks of 
Apple Computer, Inc. 


1981 Tax Preparer 


The 1981 Edition of the ‘TAX 
PREPARER by HowardSoft”’ is 
now available for Apple Com- 
puters. The new edition has several 
improvements over the acclaimed 
1980 version, including continuous- 
stream printing for professional tax 
preparers, printouts that can be 
filed directly with the IRS, expand- 
ed documentation in a quality 
notebook, and the addition of Form 
2210 to the long list of built-in 
forms (Schedules A, B, C, D, E, 
F, G, R&RP, SE, TC, and Forms 
1040, 2106, 3468, 4562, 472, 4797, 
5695). 

Unique features include on- 
screen facsimiles of IRS forms dur- 


ing preparation, easy creation, fil- 
ing, and editing of itemized lists to 
support any entry, automatic com- 
puting of all arithmetic, automatic 
linking of results of various forms, 
and easy comparison of alternative 
tax strategies. More complete and 
easy-to-use than packages costing 
many times more, this package 
comes with two disks and profes- 
sional documentation, and sells for 
$99 at dealers everywhere. (Re- 
quires Apple Computers with 48K, 
Applesoft ROM, and at least one 
disk drive.) HOWARD SOFT- 
WARE SERVICES, 7722 Hosford 
Avenue, Los Angeles, CA 90045, 
(213) 645-4069. 


Super X-10 Mod 
From CMC For 
Home/Office 
Security Systems 


The SUPER X-10 MOD, recently 
introduced by Connecticut 
microComputer, Inc. allows direct 
computer control over the basic 
components in a home/office 
security system. 

Developed for use with most 
popular microcomputers, including 
PET, APPLE, TRS-80, and KIM, 
the MOD controls up to 256 dif- 
ferent remote devices by sending 
signals over house wiring to readily 
available BSR remote modules. 
These low cost modules, in con- 
junction with the SUPER X-10 
MOD, allow microcomputer con- 
trol over lamps, motors, and 
appliances. With eight digital in- 
puts and eight digital outputs in- 
cluded, the SUPER X-10 module 
can easily be connected to switches 
at windows and doors for sensing 
by the microcomputer. The module 
can be programmed so that the 
opening or closing of a window or 
door initiates a sequence of opera- 
tions such as turning on lights, 
radio, and alarm, even if the com- 


puter is turned off. Direct, plug-in 
compatibility and software are 
available for most microcomputers. 
In addition, the SUPER X-10 
MOD can put kitchen appliances, 
stereo systems, television, motors, 
fans, pumps, and laboratory equip- 
ment under computer control. 
With the module, additional service 
from microcomputers in business 
and small industrial applications is 
now possible. A clock and calendar 


which can be read by microcom- 
puters are also incorporated into 
the module. Suggested single unit 
pricing for the SUPER X-10 is 
$249, and the module is available 
from CMC factory stock or from 
one of a select group of personal 
computer dealers. 

For further information, write: 
SUPER X-10 MOD, Connecticut 
microComputer, Inc., 150 Pocono 
Road, Brookfield, CT 06804 
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XDOS R ) : 


Commodore's 2040 Disk has been waiting for XDOS. 
The maintenance, manipulation and organization of 
disk files is simplified since XDOS eliminates the 
repetitious drudgery of disk work. DISPLAY, COPY, 
SCRATCH, LOAD/RUN operate from a fast two-column 
Menu display. Multiple files can be selected with single 
key strokes and then copied or scratched as a batch 
without further input. Take advantage of our unique risk 
free refund policy. Once you use XDOS you'll never 
give it up. 

DMENU- Display or print contents of data file. 
CMENU- Copy any number of selected files as a batch. 


user of 


SMENU- Scratch any number of selected files as a 
batch. 

MENU - Load and run a program 

SCREEN PRINT- Special key sequence copies the 
sereen image to your printer. 

DIRECT PRINT- Put a"** in front of any command 
and it will output to the printer automatically. 


DOS SUPPORT-The complete DOS SUPPORT 
(WEDGE) is included in the XDOS ROM. 

SAVE REPLACE-XDOS makes SAVE 
without a drive number completely sa 


@,..and SAVE 
nd reliable. 


UPGRADEABLE- All Prominico software is supplied in 
reprogrammable ROM which can be upgraded when 
required. 


PROMINCO LTD., 1921 BURRARD STREET, 


MANUAL INCLUDED - Comprehensive instruction 
manual included 

INE ENT-XDOS uses no RAM, and BASIC is 
unaffected by its use. 

COMPATIBILITY-XDOS is compatible with most 
other ROM products and can be ordered to fit any of the 
three available ROM sockets. 


$9750 i 
EXER 019 serious 
n can benefit from the five utilities included: 


progr 
SORT-This command takes a list of array names 

real and integer in any order or mix) and sorts 
sed on the alphabetic or numeric order of 

the first array in the list, An example best illustrates the 
flexibility of this command: Suppose you wish to 
maintain an invoice list with the data held in the 
following arrays: 


C¥(N) = Customer Number, I90(N) = Invoice Number, 
A(N) =§$ Amount, DS(N) = Date. It is nowa 
matter to put this list into order of invoice 
customer number or amount owing. An Ac 
Headsort algorithm with K - N - Log(N) characteristics 

is used for extremely fast speed even on worst case data, 


SORT TIME IN SECONDS, 


| no.orrecorps | 1000 | 3000 | 5.000 10.000 | 
INTEGER, | 2.6 8&9 15.6 33.0 | 

RE AL | 49 167 293, ree 

~ STRING | 38 | 133 | ze 


PROMINICO - PROMINICO - PROMINICO - PROMINICO - PROMINICO -PROMINICO - PROMINICO - PROMINICO - PROMINICO - PROMINICO - PROMINICO 


TWO POWERFUL PROGRAMS IN ROM FOR YOUR PET/CBM 


READ STRING -This command is a much needed 
replacement for INPUT# with the following improve- 
ments. Maximum input string length inc! ‘d from 
Embedded COMMAS, COLONS 
plable data, Null string is 
returned for empty records. 
OPTIMIZED READ, OPTIMIZED WRITE-These two 
commands drastically simplify and improve data 
storage on disk, Numerical data is written in binary 
instead of ASCH, potentially increasing d 
300%. Data is stored without the need for RI 
between records thus allowing a string to contain any 
characters including RETURN, COLON, COMMA and 
QUOTE. In addition, a list of variable names need only 
be defined once and not in each read or write statement. 
FIND SUBSTRING POSITION - POS is a very fast 
string search function which locates the position of one 
string within another. 


Risk Free Warranty: one year replacement of defective 
ROM’. if you decide to return the ROM (undamaged) 
within 30 days we will refund the full purchase price 
including postage and you may keep the instruction 
manual with our compliments 


To order use Prominico Direct Mail Response Card in 
this issue or send: Cheque, Money Order, or Visa/ 
Chargex (include expiry date and signature). Add $2.50 
postage for each ROM ordered. Specify which ROM 
socket you want to fill 


PET/CBM are registered trademarks of Commodore Business 
Machines, 


VANCOUVER, B.C. V6] 3H3. PHONE (604) 738-7811 FOR PROMPT SHIPMENT. 


PROMINICO - PROMINICO - PROMINICO - PROMINICO - PROMINICO - PROMINICO - PROMINICO - PROMINICO - PROMINICO - PROMINICO - PROMINICO 


Scientific Plotter 
for APPLE Il 


STATE COLLEGE, PA... Interac- 
tive Microware, Inc. has announced 
a program called Scientific Plotter 
which produces professional-looking 
graphs. Plotting your results with 
Scientific Plotter is much easier, 
faster, neater and more accurate 
than plotting your data by hand. 
Data may be input from the key- 
board, from the disk or it may be 
calculated by your own subroutine. 
In each case, the data may be sup- 
plied either as X,Y pairs or as Y 
values at a constant X interval. 
Since 20 different plotting symbols 
are provided, you may plot more 
than one set of data on the same 
graph. Also, error bars of variable 
length may be used to indicate the 
range of error for each point. 
Scientific Plotter gives you 
complete control of the length and 
position of each axis, the grid size 
and the interval between numbers 


that are printed along the axes. 
Thus, it is possible to plot data in 
one, two or four quadrants and dif- 
ferent scales may be specified for 
up to four axes. Any number of 
labels may be superimposed on the 
graph, using an alphabet of 76 let- 
ters and scientific symbols which 
can be printed in four different 
orientations at 90 degree angles. 
The finished graph may be saved 
on disk for later review or it may 
be printed on a graphics printer. 
Many features of Scientific 
Plotter make it easy to use. The 
program displays the allowable 
range for input values, based on 
previous answers, and warns of 
any errors. At any time, you may 
erase the graph and replot it with 
any desired changes. All previous 
answers become the defaults, so 
that you can make changes quickly. 
After the best format for your 
graph has been selected, that for- 
mat may be saved on disk for 
subsequent use with similar data. 
Five demonstrations are included 


on the disk so that you will learn 
quickly how to construct various 
types of graphs. 

Scientific Plotter requires a 
48K APPLE II computer with Ap- 
plesoft ROM. It is supplied on a 
disk with a 25 page manual for 
$25. The manual may be pur- 
chased separately for $5, refund- 
able with purchase. For further in- 
formation, contact Paul K. 
Warme, Interactive Microwave, 
Inc.; P.O. Box 771; State College, 
PA 16801 or call (814) 238-8294. 


PET Software 
Vendor Expands 


Microphys has announced the con- 
version of its entire educational 
software line for use on the Apple 
II/Bell & Howell microcomputers. 
Over 160 programs are described 
in our new Winter catalog. These 
computer-assisted instruction and 
individualized-instruction programs 
have been successfully employed in 
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Chemistry, Physics, and Calculus 
classes (on both the high school 
and college levels) and in junior 
and senior high school 
Mathematics and English classes. 
These programs continue to be 
available for use with the Com- 
modore PET/CBM systems. 

For more information, please 
contact Microphys Programs, 2048 
Ford Street, Brooklyn, NY 11229. 
(212)646-0140. 


32K Ram 
Expansion For 
Atari 400, 800 
Announced 


Sunnyvale, Calif.—AXLON, Inc. 
of Sunnyvale has announced its 
new memory expansion system for 
the Atari 400 and 800 personal 
computers. 

According to John Vurich, 
AXLON’s President, the memory 
modules, called RAMCRAM™, 
can expand the Atari 400 system to 
32K, and the Atari 800 to up to 
48K-bytes of random access user 
memory. RAMCRAM contains 16 
memory chips, yielding a total of 
32K-bytes of additional user pro- 
gram memory. 

In the case of the 400, RAM- 
CRAM is installed by removing 
the top enclosure of the computer 
console and unplugging the 8K 
RAM module supplied by Atari. 
The RAMCRAM module is then 
plugged into the same slot. 

According to Vurich, this 
modification allows the user of the 
400 system to plug in disk drives, 
printers, and any other peripheral 
devices formerly compatible only 
with the much more expensive 
Atari 800 product. ‘‘It really lets 
one upgrade a 400 to provide all of 
the capabilities of the 800 with 32K 
of RAM,”’ he commented. ‘‘Any 
32K Atari 800 software on the 
market will run on a 400 with 
RAMCRAM.” 

The advantages of RAM- 
CRAM over the Atari plug in 
memory modules are a little less 


Hayden Unveils 
Gamewarem 
Series 


ROCHELLE PARK, NJ— 

Hayden Book Company, Inc. has 
announced a new computer game 
series, called GAMEWARE™. The 
GAMEWARE series features high- 
quality, attractively-packaged com- 
puter games. 

The first three games in the 
series are: Hayden’s REVER- 
SALT, winner in the software 
division of the First International 
Man-Machine Othello Tourna- 
ment; BLACKJACK MASTER™, 
a game that allows players to test 
their betting and playing 
strategies over 
thousands of games 
in minutes; and the 
famous 
SARGON IIT 
chess game. 

According to 
Steven Radosh, 
Hayden’s Software 
Games and 
Entertainment Editor, 
‘‘Hayden’s GAMEWARE 


features the finest microcomputer 
games on the market, attractively 
packaged with four-color art, 
shrink-wrapped, and suitable for 
rack or shelf display.”’ 

Radosh said Hayden plans an 
extensive promotion program for 
the GAMEWARE series. 

All three initial games in the 
GAMEWARE series will be 
available from Hayden in 
December 1980. For more informa- 
tion, contact: Steven Radosh, 
Hayden Book Company, Inc., 50 
Essex Street, Rochelle Park, NJ 
07662, (201) 843-0550. 


*Gameware, Reversal, Blackjack Master and Sargon II are 
trademarks of Hayden Book Company, Inc 


HayDEN 
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obvious when it is used with the 
800 system. But users with future 
expansion in mind will immediately 
see that putting a full 32K-bytes in- 
to one memory slot allows 
upgrading of the system to 48K 
with one entire slot left over for 
future expansion. 

Are there any devices that can 
use the extra slot? According to 
Vurich, ‘‘There are many things in 
the near future.’’ While somewhat 
reluctant to discuss future pro- 
ducts, he did mention that a bus 
extender could be plugged into the 
third slot. Such an extender might 
terminate on the other end with a 
series of ‘‘slots’’ for use in plugging 
in ‘‘all sorts of interesting things.’” 

This is reminiscent of Atari’s 
competitors who use built-in slot 
connectors for connection of 
printers, modems, terminals, and 
other devices intended to establish 
contact between the computer and 


the outside world. 


Developing the logic necessary 
to make the system ‘‘think’’ that 
two slots are being used instead of 
one was a relatively small problem 
for Vurich and his fellow designers 
of the RAMCRAM modules. The 
Atari operating system actually 
does some bank selecting anyway, 
and they were able to take advan- 
tage of this for their own purposes. 


‘The whole idea’’, says 
Vurich, ‘‘is to take the Atari 400 
system out of the sophisticated toy 
category and turn it into a useful 
computer tool.’’ With the ability to 
plug in printers, disk drives, and 
other previously incompatible Atari 
800 peripherals, Axlon has cer- 
tainly accomplished that goal! 

For more information, please 
contact John Vurich, AXLON, 
Inc., 170 N. Wolf Rd., Sunnyvale, 
CA 94086 
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QMEGA “WHOLESALE COMPUTER PRICES” 
SALES DIRECT TO THE PUBLIC 


East Coast: 12 Meeting St., Cumberland, RI 02864 
West Coast: 3533 Old Conejo Rd., #102, Thousand Oaks, CA 91320 


Co. 


PRODUCT SPECIAL 
of the MONTH! 


Intertec Superbrain| 
32K Ram -$29 
64K Ram - $2649 


NEC spimariter vat 2 ’ 
5510-5500 - $244 ha Products are 
NOW 


~ Apple Il - 16K, 48K 
Call for Price 


Atari 800 16K - $749 
32K - $849 Okidata 


Microline 80 - 
“Diablo 630. $1995 Atari 850 Interface Module $159 525 
(with tractor feed) $2195 Atari 825 Printer $695 


Centronics - Ltd. quan. 


APPLE @ ATARI ¢ TRS-80 Model II ¢ INTERTEC 
DIABLO ¢ EPSON #e HEWLETT—PACKARD ® SOROC @ 


Televideo y 1 
4912 Bor C— +699 COMMODORE e NEC ¢ QUME ¢ CENTRONICS 
920 C — $769 3-9 $1550 


CALL TOLL FREE FOR QMEGA’S PRICE! 
EAST COAST: 1-800-556-7586 


QMEGA sells only quality merchandise to our customers. 
QMEGA will try to match any current advertised price with similar purchase conditions. 


Before you buy anywhere else — be sure to call OMEGA Sales Co. 
WEST COAST: 1-805-499-3678 EAST COAST: 1-401-722-1027 


QMEGA ships via UPS, truck, or air. COD’s. 
Visa, Mastercharge accepted, with no service charge. 


ma Telex: 952106 


QMEGA OFFERS THE BEST DELIVERY AND PRICE ON: 
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Professional Soft- 
ware Packages 


MISSION VIEJO, CA — Com- 
puSoCo has announced the release 
of three new professional software 
packages for the Dentist, Attorney, 
and consultant. The series of ‘‘Pro- 
fessional’ packages is designed to 
utilize the popular desk type com- 
puter for appointment scheduling, 
professional time management, 
private client billing, and manage- 
ment reporting. 

The first new package, called 
Professional I, is for the Dental 
Professional. The system features 
preparation of A.D.A. claims forms 
for third party patients. The system 
also allows the professional to 
locate and prepare notices for pro- 
fessional dental checkups auto- 
matically on the schedule the den- 
tist feels advisable for his patients. 

The second package, called 
Professional II, is geared to the 
needs of the legal profession. The 
system features preparation of 
special reports for third party legal 
plans and special accounting plans 
to analyze court time usage, and 
work on retainer or contingency 
engagements. 

The third package variation, 
called Professional III, is a general 
purpose package for consultants, 
accountants and contract ad- 
ministrators. This system allows 
the creation of sub-jobs, special 
cost centers, overhead accounts, 
billing under time and materials 
contracts, fixed priced job cost ac- 
counting and many other job set 
up systems. 

All systems include daily cash 
reports, time utilization, and pro- 
fessional service reporting. Monthly 
reports include full aged accounts 
receivables by client and class of 
client as well as third party payors. 
Management and analysis package 
which is so flexible it can be used 
to manage personal finances or 
client trust account funds. 

All systems require an Apple 
II or Apple II Plus computer with 
Applesoft, a 130 column printer, 
and at least two mini practitioners 


with client bases of up to 10,000 
clients each. 

The systems are available from 
CompuSoCo at a single site license 
cost of $750.00 for the selected 
package. Additional information is 
available from CompuSoCo, 26251 
Via Roble, P.O. Box 2325, Mis- 
sion Viejo, California 92690. 


Hellfire Warrior, 
Sequel To Temple 
Of Apshai, Now 
Available 


Automated Simulations, is now of- 
fering the sequel to the best-selling 
Temple of Apshai, Hellfire 
Warrior. 

Like the Temple of Apshai, 
Hellfire Warrior is a fantasy role- 
playing adventure, but with more 
magic, more detail and more com- 
mand options. Hellfire Warrior lets 
the player take on the role of his 
favorite hero. 

The player must rescue the 
beautiful warrior maid Brynhild 
from the depths of a four-level 
dungeon and bring her back to sun 
and air. 

Hellfire warrior has more than 
200 rooms—riddled with trap 
doors, bottomless pits, and filled 
with monsters and treasures, and 
the player must kill the great bat- 
winged demon, cross bridges of 
flame, face death itself and live 
before the adventure is complete. 

Hellfire Warrior is a game for 
experienced fantasy role-playing 
gamers. Even more challenging 
than The Temple of Apshai, 
Hellfire Warrior allows the player 
to explore four levels of 60 rooms 
each. 

The magical rooms of level 
five are inhabited by giant insects. 
On level six, the player must 
search for the only exit, hidden 
within the labyrinth. And on level 
seven, the player must do battle 
with skeletons, ghouls, mummies 
and even invisible ghosts. 

The culmination of the adven- 
ture lies on level eight. But first the 


player must overcome the legions 
of the lost souls in an underworld 
guarded by dragons and riddled 
with bottomless pits and blasts of 
hellfire. 

Hellfire Warrior includes an 
armory where the player must 
bargain with a tight-fisted inn- 
keeper for five types of armor, five 
kinds of swords and shields in two 
sizes. He will also find 13 kinds of 
potions and healing ointments to 
choose from. At the Magic 
Shoppe—if the player has enough 
money, he can have ordinary 
weapons transformed into Magical 
ones. 

Hellfire Warrior is available 
on cassette for the PET (32K) and 
TRS-80 (Level II, 16K), and on 
disk for the TRS-80 (32K) and the 
APPLE (48K with ROM Ap- 
plesoft) for $39.95 from Automated 
Simulations, P.O. Box 4247, 
Mountain View, CA. 94040. 


Space Wargame 


Strategic Simulations has just 
released its first space wargame, 
The Warp Factor. The game 
allows one or two players to choose 
from among 12 starship designs 
representing 5 Galactic Empires. 
The player(s) are placed squarely 
in the Captain’s role, dealing with 
the critical parameters of in- 
terstellar battle such as energy 
allocation for phasers, shields, 
disruptor bolts, screens, and warp 
engines. With an average game 
lasting between thirty minutes and 
four hours, the player(s) can create 
scenarios ranging from space skir- 
mishes to a full-scale, all-out star 
war. For $39.95 the game comes 
complete with a Starship Operating 
Manual, 3 Starship Data Cards, 
and a Game Selection Card. The 
Warp Factor is available on disc 
for a 48k Apple II (Applesoft 
ROM). 

For more information, please 
contact Stratetic Simulations Inc., 
465 Fairchild Drive, Suite 108, 
Mountain View, CA 94043. 

(415) 964-1353. 
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Don’t lose your message 
because of the medium... 


CASSETTES 


The cassette tapes used for recording data are 
composed of two parts: the cassette shell and the tape 
loaded into the shell. The shell can be either a5-screw or 
sonic welded type withanon-magneticleader or a magnetic leader (socalledleaderless 
cassettes). The shell used in our cassettes is of premium quality. 5-screw, with non-magnetic leader. The 
choice of non-magnetic leader may confuse some people, but there is a valid reason. There is a splice 
required to connect the magnetic tape to the leader at both ends of the tape. A person recording program 
material or data, using a leaderless tape, stands to drop a bit of data at the splice point. Notall leaderless 
tapes have the splice and you have to be very careful when buying this type of data tape. We use standard 
leader to avoid the confusion, and unhappy customers when the first recording on the tape is always bad. 
The tape used in our cassettes is of studio quality, The same type 
of tape is used by some studios for making master recordings. The 
magnetic tape used in the cassette is the true heart of the cassette. 
You can have the best shell made, but with low quality tape it is 
still junk. 
The cassettes offered here have been chosen for the high- 
© est quality components consistent with a practical cost level. 
Cassettes come packaged in boxes of 10. They are 
offered in 10 and 20 minute lengths. 


ih Oe etree seta: rear nas vba, doe, Shean uns sans elecetscevrE a 3. $6.95 + $1 
(CHZL0) Spe Ama tater eye ca ace RE SRTOIS Sore $7.95 + $1 


DISKETTES 


We offer two levels of diskettes: certified and non-certified. The certified diskettes have been put 
through a test to check the entire working surface for bad spots. These diskettes are certified error-free 
by the manufacturer. If you require assurance of every diskette being perfect, then the Dysan certified 
diskette is for you. 

The BASF company invented magnetic tape from which the very large and varied industry of today has 
grown. We offer the BASF premium quality (non-certified) Diskette. These diskettes enjoy one of the 
lowest reject rates of any manufacturer (all our disk-based software is duplicated on BASF). 

Weare also offering diskettes from 3-M SCOTCH. These come encased ina touch (PVC) jacket which 
resists handling damages. They are certified 100% error-free. Their low modulation provides better 
signal stability 


ae stSeih  ayE. aps Save sys Ss RA abana otesos aateree di are satan aad aver bata auataven MAaiateeiaels Aga IAT $19.95 + $1 
. 5 5 - - $34.95 + $2 
Pe pry eee: aCe Sore nan ee oe stare rn ane $299.00 + $3 


3-M SCOTCH 

O BROKE EO) se: sccccttssana ava -suacarecrxsans pues ataiieatrcived see yun monceuate gtx san calaae Ist aly coudraneeal ecard aaron wba ree $39.95 + $2 
DYSAN: 
BOE OTE Se ccrccg ce vastosrv end cope ese ze cs lrs sadetarmeriana Nant lege no Pasa aes nas Rea Gracrnarateeariear eae $29.95 + $1 


The Software Exchange 


6 South St.. Milford, NH 03055 
TO ORDER TOLL-FREE: (in NH call 673-5144) 


1-800-258-1790 
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Hooray for SYS 
(Correction) 


Harvey B. Herman 
Greensboro, NC 27412 


There is a problem with the APPEND programs 
(Jan. 1981 COMPUTE!) for ‘‘old’’ and ‘‘new’’ 
PETs. I recently learned that there are four kinds of 
PET cassette tapes. Unfortunately, in my ignorance, 
I only tested two types, both of which worked. The 
third very common PET tape, made with ‘‘new”’ 
ROMs, was ignored and, in fact, does not work. An 
easy fix which will cover most, but not all, cases is to 
change line 230, in both APPEND programs to: 

230 C=C -3:T=C +1: IFPEEK(635) =0 THEN 
C=C-1:T=T-2 

The programs will now work with the PET tapes 
which users are most likely to encounter. It may be 
instructive to discuss the remaining problems in more 
detail as readers may not be aware of it and could 
come to grief, as I did. 

Both versions of APPEND were designed to 
work with tapes made on ‘‘old’’ and ‘‘new’’ 
machines. There is a difference in tapes — original 
ROMs save starting at hex 400 (dec 1024) and 
upgrade ROMs save starting at hex 401 (dec 1025). 
The APPEND programs, as published, checked for 
start save at statement 230 and made a minor correc- 
tion depending on which machine was used to make 
the tape. What I did not know was that new 
machines saved one byte less on either end. A short 
program which is written and saved on an ‘‘old’’ 
machine saves, for example, from hex 400 to hex 424 
(call this case 1). The same program, if written and 
saved on a new machine (call this case 2) would be 
saved from hex 401 to hex 423 (one less on both 
ends). If the case 1 tape for the example program, is 
loaded into a ‘‘new’’ machine and saved, we get a 
tape which I will call case 3. This tape is a hybrid of 
cases 1 and 2. Locations saved are from hex 401 to 
hex 424. My tests for APPEND were done unwit- 
tingly with case 1 and case 3 tapes. The line 230 cor- 
rection discussed above, will allow the program to 
work with case 2 tapes. Hybrid case 3 tapes will not 
work but can easily be converted to case 2 after 
loading by decrementing the location pointer at hex 
28 and 29 (dec 42 and 43) and resaving the program. 
Thus, after loading our short example (case 3 or case 
1 tape) change location hex 28 (dec 42) from hex 24 
(dec 36) to hex 23 (dec 35) and save again. This new 
tape (now case 2) and the old one (if case 1) will 
both append properly. There is also a hybrid case 4 
which requires the location pointer on old PETs to 
be incremented but I think you get the idea. 

I want to thank Brien L. Wheeler for calling my 
attention to a possible error in APPEND and 
apologize to all readers for this inconvenience. 


By Netronics 


ASCII/BAUDOT, 
STAND ALONE 


Bi 
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The Netronics ASCII/BAUDOT Computer Terminal Kit is a 
microprocessor-controlled, stand alone keyboard/terminal 
requring no computer memory or software. It allows the use of 
either a 64 or 32 character by 16 line professional display for- 
mat with selectable baud rate, RS232-C or 20 ma. output, full 
cursor control and 75 ohm composite video output 

The keyboard follows the standard typewriter configuration 
and generates the entire 128 character ASCII upper/lower case 
set with 96 printable characters, Features include onboard 
regulators, selectable parity, shift lock key, alpha lock jumper, 
a drive capability of one TTY load, and’ the ability to mate 
directly with almost any computer, including the new Ex- 
plorer/85 and ELF products by Netronics. 

The Computer Terminal requires no 1/O mapping and 
includes 1k of memory, character generator, 2 key rollover, 
processor controlled cursor control, parallel ASCII/BAUDOT 
to serial conversion and serial to video processing—fully 
crystal controlled for superb accuracy. PC boards are the 
highest quality glass epoxy for the ultimate in reliability and 
long life. 


VIDEO DISPLAY SPECIFICATIONS 

The heart of the Netronics Computer Terminal is the micro- 
processor-controlled Netronics Video Display Board (VID) 
which allows the terminal to utilize either a parallel ASCII or 
BAUDOT signal source. The VID converts the parallel data to 
serial data which is then formatted to either RS232-C or 20 ma. 
current loop output, which can be connected to the serial 1/0 
on your computer or other interface, i.e., Modem 

When connected to a computer, the computer must echo the 
character received. This data is received by the VID which 
processes the information, converting to data to video suitable 
to be displayed on a TV set (using an RF modulator) or on a 
video monitor. The VID generates the cursor, horizontal and 
vertical sync pulses and performs the housekeeping relative to 
which character and where it is to be displayed on the screen. 
Video Output: 1.5 P/P into 75 ohm (EIA RS-170) « Baud Rate: 
110 and 300 ASCII * Outputs: RS232-C or 20 ma. current loop 
* ASCII Character Set: 128 printable characters— 


aBYS eBvxpvabeyoRoaa3°22=2i fete 

8828’ (9+, -. 70123456789 
GRBCDEFGHI JKLHNOPORSTUMAXYZ(\1*_ 
‘abcdef ghi jklanoparstuvwxyz(i +8 


BAUDOT Character Set GHIJKLMNOPO 
RSTUVWXYZ-? 


Vertical Tab, Carriage Return. Two special cursor sequences 
are provided for absolute and relative X-Y cursor addressing © 
Cursor Control: Erase, End of Line, Erase of Screen, Form 
Feed, Delete * Monitor Operation: 50 or 60Hz (jumper 
selectable. 


Continental U.S.A. Credit Card Buyers Outside Connecticut 


CALL TOLL FREE 800-243-7428 


To Order From Connecticut Or For Technical 
FH ™ Assistance, Etc. Call (203) 354-9375 “= “I 
| Netronics R&D Ltd.. Dept. K-2 I 


333 Litchfield Road, New Milford, CT 06776 
Please send the items checked below— 
© Netronics Stand Alone ASCII Keyboard/Computer 
| Terminal Kit, $149.95 plus $3.00 postage & handling. 
O Deluxe Steel Cabinet for Netronics Keyboard/Termi- 
I nal In Blue/Black Finish, $19.95 plus $2.50 postage | 
and handling. 
[10 Video Display Board Kit alone (ess keyboard), $89.95 I 


plus $3 postage & handling. 

| © 12” Video Monitor (10 MHz bandwidth) fully assem- I 
bled and tested, $139.95 plus $5 postage and handling. 

| © RF Modulator Kit (to use your TV set for a monitor), I 
$8.95 postpaid. 

[05 amp Power Supply Kit In Deluxe Steel Cabinet | 


(£8VDC @ 5 amps, plus 6-8 VAC), $39.95 plus $2 
[postage & handling. I 
Total Enclosed (Conn. res. add sales tax) S = 

By— 

O Personal Check © Cashiers Check/Money Order 

O Visa © Master Charge (Bank#____) f 

Acct. # = | 

Signature : Exp. Date _ 

Prin u 
I Name I 

Address 1 

City i 


State Zip ae 
Pe meme meer Send Me More Information ommz mmm al 
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COMPUTE! 


David Ahl, Founder and 
Publisher of Creative Computing 


You might think the term “creative com- 
puting” is a contradiction. How can some- 
thing as precise and logical as electronic 
computing possibly be creative? We think 
it can be. Consider the way computers are 
being used to create special effects in 
movies—image generation, coloring and 
computer-driven cameras and props. Oran 
electronic “sketchpad"” for your home 
computer that adds animation, coloring 
and shading at your direction. How abouta 
computer simulation of an invasion of killer 
bees with you trying to find a way of keep- 
ing them under control? 


Beyond Our Dreams 


Computers are not creative per se. But 
the way in which they are used can be 
highly creative and imaginative. Five years 
ago when Creative Computing magazine 
first billed itself as “The number 1 maga- 
zine of computer applications and soft- 
ware,” we had no idea how far that idea 
would take us. Today, these applications 
are becoming so broad, so _all- 
encompassing that the computer field will 
soon include virtually everything! 

In light of this generality, we take “appli- 
cation” to mean whatever can be done with 
computers, ought to be done with comput- 
ers or might be done with computers. That 
is the meat of Creative Computing. 

Alvin Toffler, author of Future Shock and 
The Third Wave says, "| read Creative Com- 
puting not only for information about how 
to make the most of my own equipment but 
to keep an eye on how the whole field is 
emerging. 

Creative Computing, the company as 
well as the magazine, is uniquely light- 
hearted but also seriously interested in all 
aspects of computing. Ours is the maga- 
zine of software, graphics, games and sim- 
ulations for beginners and relaxing profes- 
sionals. We try to present the new and im- 
portant ideas of the field in a way thata 14- 
year old or a Cobol programmer can under- 


A REMARKABLE MAGAZINE 


creative 
COorpatirg 


“The beat covered by Creative Computing 
is one of the most important, explosive and 


stand them. Things like text editing, social 
simulations, control of household devices, 
animation and graphics, and communica- 
tions networks. 


Understandable Yet Challenging 


As the premier magazine for beginners, it 
is our solemn responsibility to make what 
we publish comprehensible to the new- 
comer. That does not mean easy; our 
readers like to be challenged. It means 
providing the reader who has no prepar- 
ation with every possible means to seize 
the subject matter and make it his own. 

However, we don't want the experts in 
our audience to be bored. So we try to 
publish articles of interest to beginners and 
experts at the same time. Ideally, we would 
like every piece to have instructional or 
informative content—and some depth— 
even when communicated humorously or 
playfully. Thus, our favorite kind of piece is 
acessible to the beginner, theoretically 
non-trivial, interesting on more than one 
level, and perhaps even humorous. 

David Gerrold of Star Trek fame says, 
“Creative Computing with-its unpreten- 
tious, down-to-earth lucidity encourages 
the computer user to have fun. Creative 
Computing makes it possible for me to 
learn basic programming skills and use the 
computer better than any other source. 


Hard-hitting Evaluations 


At Creative Computing we obtain new 
computer systems, peripherals, and soft- 
ware as soon as they are announced. We 
put them through their paces in our Soft- 
ware Development Center and also in the 
environment for which they are intended— 
home, business, laboratory, or school. 

Our evaluations are unbiased and accur- 
ate. We compared word processing printers 
and found two losers among highly pro- 
moted makes. Conversely, we found one 
computer had far more than its advertised 
capability. Of 16 educational packages, 


fast-changing.”—Alvin Toffler 


only seven offered solid learning value. 

When we say unbiased reviews we mean 
it. More than once, our honesty has cost us 
an advertiser—temporarily. But we feel 
that our first obligation is to our readers and 
that editorial excellence and integrity are 
our highest goals. 

Karl Zinn at the University of Michigan 
feels we are meeting these goals when he 
writes. “Creative Computing consistently 
provides value in articles, product reviews 
and systems comparisons... . ina magazine 
that is fun to read.” 


Order Today 


To order your subscription to Creative 
Computing, send $20 for one year (12 
issues), $37 for two years (24 issues) or $53 
for three years (36 issues). If you prefer, 
call our toll-free number, 800-631-8112 (in 
NJ 201-540-0445) to put your subscription 
on your MasterCard, Visa or American Ex- 
press card. Canadian and other foreign 
surface subscriptions are $29 per year, and 
must be prepaid. We guarantee that you 
will be completely satisfied or we will re- 
fund the entire amount of your subscrip- 
tion. 

Join over 80,000 subscribers like Ann 
Lewin, Director of the Capital Children's 
Museum who says, “I am very much im- 
pressed with Creative Computing. It is 
helping to demystify the computer. Its arti- 
cles are helpful, humorous and humane. 
The world needs Creative Computing.” 


creative 
corepatirg 


Attn: Barbie 
P.O. Box 789-M 
Morristown, NJ 07960 
Toll-free 800-631-8112 
(In NJ 201-540-0445) 
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Writing For 
COMPUTE! 


Robert Lock, Editor/Publisher 


We are always seeking good material for publication 
in COMPUTE! I cannot overstress our interest in 
material for the beginner; in short (e.g. 1 page or so) 
programming hints; in material that crosses 
‘machine boundaries’’. We present a mix of long ar- 
ticles and short ones. Length is not a criteria of suc- 
cess. Frequently our most favored articles have been 
simple, provocative programs. 


Remember The Beginner 

Every time an issue of COMPUTE! goes out, there 
are new readers, with new machines, trying to get 
started with documentation that may or may not 
meet their needs. That’s one of the reasons we stress 
good solid introductory material. Many of our 
reacers are interested in simple programming 
assistance and support. Many are interested in useful 
programs that allow them to get more practical use 
from their machines. 


Guidelines for Potential Authors 

Take a look at The Readers Feedback column this 
time. It’s devoted to reader comments on content. 
Then sit down and write up a brief article describing 
that program you’ve been using at home for six 
months that you think nobody else would be in- 
terested in. You might be surprised. 


Submitting Articles To COMPUTE! 
Manuscripts should be double spaced, typed with 
both upper and lower case (please!). Program listings 
should be provided in printer output form as well as 
machine readable form. If you don’t have a printer, 
that shouldn’t stop you from submitting an article. 
I’m sure your local store or a friend would be more 
than happy to let you run off a listing for COM= 
PUTE! If that isn’t feasible, send it anyway. Many 
excellent articles don’t even contain programs. 
Address your articles to: 


The Editor 

COMPUTE! Magazine 

P.O. Box 5406 

Greensboro, NC 27403 USA 


The Follow-Up 

We pay for accepted articles based on their number 
of pages in the magazine. You’ll receive payment 
after the article appears. Thanks to you all for 


writing for COMPUTE! e 
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beautitul deluxe padded binder 
Skybombers II 
Apple-Doc 
Programmers Utility 
DOS Too! Kit 
Microsott Adventure 
Olympic Decathion 
Compu-Math: Anthmetic 


Zedek 
At Time Super Star Baseball 
CRAE20 
MCAT 20 


TIPROGRAMMER — Hexicecmal/Octal Calculator 
Retail $65.00 

MPI 8G Printer 

The Prisoner 

The Wizard & The Princess 

Compu-Spall 

Computer Ambush 

Computer Bismark 

Computer Napoleonics 

Computer Quarterback 


Space Album 
Odyssey 

Both Barrels 
Moditiabie Database 
Micro League Baseball 
Sargon I! 


NTS TN TN NTN TN IN TN ee ee | 


Space Eggs 
Mystery House in French 
2:80 Sottcard with CP/M 
Videx 80:Col Board 

EZ Draw 

Head On 

3D Super Graphics, 
Compu-Math I or I 
HI-RES Cribbage 
Phantom Five 

Star Gazer s Guide 
Lords of Karma 
Tawala s Last Redoubt 
Apple PIE & Formatter (Reg $129.95) 
Apple World 

‘ABM (Muse) 

Data Plot (Muse) 
Computer Contict 
Computer Air Combat 
Terrorsst 

The Temple of Apshai 


VARVARA 
NNN NON NONI NANOS 


Super-Text Il 
Magic Window 

CCA Data Management 
VISICALC. 

Acant. Fortune-teliing 
Hornblescope 

Gomoku (cass) 

Reversal 

16K NEC Memory 
Savage Island Adv. (cass ) 
Baker s Tnlogy 
Crosswords 
Ncregammon i 


HIRES Football (On-Line) 
Fastgammon 


| Video Card 
er 


Send tor TRS-80, PET and ATARI Catalog also. 
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Big Savings On Atari & PET! 


No Risk - No Deposit On Phone 


Orders - Shipped Same Day You (800) 233-8950 


Call? - C.0.D. or Credit Card 
Please Call Between 11AM & 6PM 
(Eastern Standard Time) 


* On all in stock units 


Program Cassettes: 
CX4121 Energy Czar 


Atari® 


™ 
CX4108 Hangman 
oo 1 F CX4102 Kindgon ... 
rs CX4112 States & Capitals . 13 
e ona CX4114 European Countries & 
(Capitals sc.ccscmecsctesacnnectictey 13 
Com p uter Education: (Talk & Teach Courseware) 
. CXL4001 Education System 
List $1080 Master 
CX6001 U.S. History. 
on ly $744 ; ® — CX6002 U.S. Government . p38 
Atari® Software CX6003 Supervisory Skills. . 23 
e 7 . : CX6004 World History (Western) 23 
Atari® Peripherals: Entertainment: CX6005 Basic Sociology ........ 23 
CXL4004 Basketball. me CX6006 Counseling Proceedures . 23 
400 8K .... CX4105 Blackjack . CX6007 Principles of Accounting 


400 16K... CXL4009 Chess... 


410 Recorder 
815 Disk. 
810 Disk . 
822 Printer. 
825 Printer. 
830 Modem.. 
850 Interface Module. 


CX6008 Physics....... 
CX6009 Great Classics 
18 — CX6010 Business 
30 Communications 


62 CXL4011 Star Raiders” . 
1199 _CX4111 Space Invaders. 
489  CXL4006 Super Breakout 
359 CXL4010 3-D Tic-Tac-Toe . 30  CX6011 Basic Psychology. 
779 _CXL4005 Video Easel CX6012 Effective Writing... 
159 Personal Interest & Developement CX6014 Principles of Economics 
179 CXL4104 Mailing List CX6015 Spelling....... 
CX4107 Biorhythm... CX6016 Basic Electricity 
3 i CXL4007 Music Composer 45 CX6017 Basic Algebra. 
Atari® Accessories CX4110 Typing 20 Professional Applications 


CX4101 An Invitation to : CX8102 Calculator . $23 
CX852 8K RAM... $ 94 PROQGFAMMING ...004.ccrneagesiesaieeaee 17 CX4109 Graph It.. 17 
CX853 RAM.... 149 Information & Communicatio CX4103 Statistics 17 


CX70 Light Pen 64 _CXL4015 TeleLink™.... 20 Investment Analysis: 


CX30 Paddle . 18 Programming Languages: CX8106 Bond Analysis .$ 20 
CX40 Joystick 18 CXL4003 Assembler Editor........... 46 CX8107 Stock Analysis. 20 
CX8100 Blank Diskettes (5/box) ..... 22 CXL4002BASICComputingLanguage. 46 CX8101 Stock Charting... 20 


Disks 


Sycom Disks 


Software 


Professional Software Inc. 


commodore 


| 4 
 €¢ Commodore Computers: 


4032N . .. $1090 
4032 B 1090 
8032 .. 1499 


WordPro 3 (40 col.) .. 
WordPro 4 (80 col.) .. 
WordPro 4 Plus (80 col.). 


514" Soft Sector - Single Density 
Boxlof 10) sazestcicvaesasesaas desman $29 


Maxell Disks 


5%" Floppy - MD1, Single Density 
Box of 10 .........6+ $34 
MD 2, Double Density 
Box Of 10 sseeceeeens 44 


Personal Software, Inc. 


Commodore Peripherals: 


CBM 2022 Printer .......0..s0s0eeee08 675 
CBM 4040 Dual Drive Floppy Disk 1090 
CBM 8050 Dual Drive Floppy Disk ... 1420 
CBM C2N Cassette Drive.... ; 


Visicalc - Apple. 
Atari 
PET .... 


Printers 


Okidata 80 
Trendcom 200 


Microtek - for Atari 
JIGK' RAM) aeiupcarniciiistrcasairmayics 
GBI BAM susinsoannsoutysesaaace 


Cables: 


PET to IEEE Cable........... santa 
IEEE to IEEE Cable ............... oe. 46 


WEWS ~ PSS epg ia ae eee 
NEW-VIC- 20 ....... ccc eee cee Commodore Tax Package 


To Order: Computer Mail Order 


Phone orders invited (800 number is for order desk only). Or send check or money order. 501 = Third St. 
Equipment Shipped UPS collect. Pennsylvania residents add 6% sales tax. Add 3% for Williamsport, PA 17701 
Visa or MC. Equipment is subject to price change and availability without notice. (71 7) 323-7921 


168 COMPUTE! 


March, 1981. Issue 10. 


Advertiser's Index 


Aardvark Technical Services ............. 
ABI COMPUTE Stearn cnn miniss scm Aaane bs ck 3 
ADOCUS SOMWONO Ss iisccacie eek wesw 
Adventure Internationdl..............00. 
AINGSKe ite Bcccche warcag eta Reve cose 
ANMCIOMEGGE recdetecns ces cnndeconiviyinnaneech ere cae 
LN Kelthl inches meat cmoteey tan hee eae, eee ee 
Avant-Garde Creations ..............005 
Beta Computer Devices ................. 
Ra Brachmaniand Asso. s.e 54 cas caer 
HENVASBTIOY. cist, crete serach aeonctavtan 
Canadian Micro Distributors 
Cascade Computerware Co. ............ 57 
GAESSONWGlOR ar tatters sat cguemes oad 86 
EERSIMICIOTSSH ss cetvrcrvatarne on 4 sanahonnys 133 
Channel'Datal Systems! 3.65 69% 6.6 cakes 95 
CMS Software Products ........... 47,97,125 
Cognitive: PrOGUCTS: oo .ce ducati ren sania m 
Color Computer Concepts............005 77 
Commodore Business Machines ......... BC 
Competitive Software... ........c cee ceaas 113 
COMPUGKAPNICS seis na kee wie 86 
Computer House Div. ........ 0000s 69,111 
COMPUT MEGISUT ho vce casicennaner siden ea 57 
Computer Mail Order .............00000, 167 
COMPUTCMMA rer cei nb) s50dauo sons 70 
COMPUTES VOICE™ ese ccgsn nea cee Rai wn 25 
Computerware Outlet ...............005 128 
Connecticut microComputer......... 34,35 
Creative COMPUTING... ce ince cee a 165 
(SIU io] american tek nae ere nee 135 
EYDENG ING. ratumeet mice sarcwnaniuntad andes 129 
Danville: DISHIBUTOLS sage scaare sonln scccnsct-nteslad 77 
Datasoth; x aianoten ube te entre saleuoteenee 73 
DISCOMOC Mise arsenite adienaenns ORS 66 
Dre Daley/S'SOMWONG in. Dasa Pin deren eye 115 
DY MAGCORMPD writen tage tiemten tac dici-omernatoesie 29 
Eastern House Software ............0, 23,25 
ECX Computer Company............0005 m 
Educational Computing Magazine ....... 46 
ElOCTIONIG SBOGCIGIISTS #288) orcad seca e nn es 52 
ESCO: PROGUICTS ys cantante te ncasrsstere es anttenn 55 33 
EVSCSOmPOrstontiniscceackecnacciianaun we 
EXGON PINGS trnatees scuba Non apen.s.4.8 Roane aks 
FSS! weuudea teas al ageimepad as 20 ¢-% 47,94, 103 
Home and Educational 

Computing Magazine ................. 45 
HOWIGIIMGUSTROS  ssse sssatiecacsisien ys suaaep ouars 155 
Howard Software Services .............05. 11 
Hudson Digital Electronics, Inc............. 15] 
Human Engineered Software............. 72] 
Huntington Computing ..............00. 166 
Image Computer Products ............ 18, 69 
InStaMt SORWOlE.s « srsaceateseowern seca’ 122,123 
ol Raat tear eae eer ene ee nee 16 


ESGEINGIEGDGS ares Bh Oe cea aka dass Se desaue IBC 
LSIMBATGIPOGUECTS isis ks <4 sedeascusiere iieow sagan 118 
Madison Computer wi..06 6.62 caivecisicn onus 113 
Magic Lantern Computers ............005 47 
Charles Mann & ASSOC.......000 0 eee eee 18 
ManIXKSOHWONG ins nin cranenanba ve vaneaes 39 
Micro Computer Industries, Ltd........... (e)) 
MIGIOZ COO cas Sout ead lb atcun Bua ee ots ered 33 
MICTOSEGHIN Sissi cacithaaetwmitedta miavavnaiueeentore 55 
MICKOINIGTO a. osnits strane een sen uererinoes 149 
Micro Mini Computer World .............. 9 
MicrOphySPrOGhGMS: . ics cacsanasageenes 52 
Microsoft Consumer Products ............. 2 
Micro Technology Unltd............... 37,139 
MICKOT OMA ert rarirrona aacaceniicawnrn de wave aes 81 
Mountain Computer. ....... 6.0.0 c cee IFC 
IVI RU ae rrcacat ica enter. ety acounrreeaaihaee oe a acher aN are i(e) 
National Computer Shows ............005 1 
NOtrONMIGS iis... 5 see eee WA cnet dint gag aoe Fes shatus 164 
New England Electronics Company ... .26, 27 
Omega Sales Company..............005 161 
MLNS SYSTEMS: veesea 0 0 e604 5-0 aaneronens aera arn 63 
OPTIMEITESHNONOGY seca ius. 556 404-63 ow wnre sens 4) 
Optimized Data Systems .............0. 109 
OROMSOMWEARS tan sa cc acna es eicesed.ad Wace ad 88 
@SHOMEIECASSOG « secaseses6 disse w wd miairoes tivecbionaboee 13 
RACTIC EXENGNGES a ssscssiisnecsrecsieagan on tuavecs 58, 91 
POMmyiPOrlOMOVEdlSis.o:0 0 edeaze.e-snoin es sara ap aeees 141 
Professional Software, INC. ......... 60. eee 

PrOgGhamMiIDEsSIGNING «scans ennnsnes oe eaan 75 
Progressive Computer Software.......... 24 
Progressive Software ........ cece ees 65 
Prometheus Products ...........0.eeeeeee 3] 
RiOMiNiCOscmeva ian etag valinits Hy deia seen 159 
QUAIITWSOMWOICksseacnarsds aa ows nan aanes 79 
Rehnke Enterprises, Software Div. ........ 149 
BOD RET CMSs arecy «scare aie ancciaoitarss tow trasdaie sonmetes 91 

RNBIEMErOrISES:. .cincce ni aoe bas memienes 147 
Scott, Foresman & Company............. a 
Seawell Microsystems ...........00 eves 4] 
Skyles Electric Works ........... 98,99, 119, 131 
SOMWORGICHIY, oss cmasaaine sods wwenesou ean’ 157 
The Software Exchange..............005 163 
SPESCITUM'SOMWAIE 0. ec ane ac enw mannene 21 
SMESTEIECHONICS 6 oo iiccck ose cats een cwun 6] 
SWITY:SOMWEMCUinciencseineeetaeaaeuas 76,78 
Systems Formulate ..............00008 58, 61 
tecenRs MOOI St oaths ece crates tare ees inch i 4 ceratat 5] 
SAE OHS Pore texatsns se dtigaiaidea asauteue saute Meeueann a ae 76 
HIS Geta cree cae ,coi ai atinnenniiiuavan ein matanuns 17 
TINWECOMBOLATION sites 66.8 60 arisen sora ae 19 
United Software of America ............. 6,7 
Virginia Micro Systems........... ccc eee 174 

MISTS Ker sens taiattetrgateogirtias achat linlivoun ausiracun 9 ait V7 
Ziegler Electronic Products .............. 137 


IF YOU CAN 
WAITA MINUTE, 
WE CAN SAVE 
YOU *1,000. 


With the Starwriter™ Daisy 
Wheel 25 cps printer from C. Itoh. 

A business letter, written on a 45 cps 
word-processing printer, might take 
about two minutes to print. 

With the Starwriter, it might take 
closer to three. 

The typical 45 cps printer retails for 
about $3,000. 

But the Starwriter 25 retails for about 
$1,895—thus saving you about $1,000. 

And therein lies the biggest difference 
between the Starwriter 25 and the more 
expensive, daisy wheel printers. 

The Starwriter 25 comes complete 
and ready-to-use, requiring no changes 
in hardware or software. It uses indus- 
try-standard ribbon cartridges, and it’s 
“plug-in” compatible to interface with a 


TIE 


LEADING 
EDG 


wide variety of systems, to help lower 
system-integration costs. 

Using a 96-character wheel, it 
produces excellent letter-quality print- 
ing on three sharp copies with up to 163 
columns, and offers the most precise 
character-placement available, for out- 
standing print performance. 


C. Itoh’s warranty; 

3 months on parts and labor, sup- 
ported by one of the best service organi- 
zations in the industry. 


| Leading Edge Products, Inc., 
| 225 Turnpike Street, 
| Canton, Massachusetts 02021 
| Dear Leading Edge: 
I'dlike to know more about the Starwriter, and 
| how spending a minute can save me a grand. 
\ Please send me the name of my nearest dealer. 


| Title 
Company. 
Street 
State Zip. 

Phone: Area Code ——___________ 
| Number 


| 
| 
| 
| 
| 
| 
| 
| Name | 
| 
| 
| 
| 
| 
| 
1 


Leading Edge Products, Inc., 225 Turnpike Street, Canton, Massachusetts 02021 


Dealer inquiries invited. For immediate delivery from the Leading Edge Inventory Bank™ call toll free 1-800-343-6833 


In Massachusetts, call collect (617) 828-8150. Telex 951-624 


The Great 
American Solution 
Machine. 


Meet Commodore. The busi- 
ness computer that’s providing 
solutions for more than 100,000 
pope all over the world. Built 

y one of the pioneers in office 
machines. With a reputation for 
quality that can only come from 
vertical integration of the total 
manufacturing process. Commo- 
dore builds, not assembles. 

Compare Commodore’s word 
and data processing capabilities 
with computers costing twice or 
even three times as much. You'll 
see why so many small busi- 
nesses are turning to Commodore 
for solutions to problems as var- 
ied as these: 

OA car leasing company’s cus- 
tomers were terminating too early 
for account profitability. Solu- 
tion: A 16K Commodore. It 
analyzes cash flow on over 1200 
accounts, identifies those for 
early penalties, and even writes 
up lease contracts. Commodore 
paid for itself within weeks. 

A law firm needed a high 
quality, easy-to-use, affordable 
word processing system. 
Solution: Commodore plus 
its WordPro software pack- 


age. At a $6,000 savings. 
A gasoline retailer needed to 
inventory, order and set prices; 
determine Federal and state 
income taxes; and comply with 
Federal pricing and allocation 
regulations. All done daily, 
weekly, monthly and yearly. 
Solution: Commodore. It keeps 
his business on track—and Uncle 
Sam off his back. 
CA paint and wallpaper store 
had to inventory over 600 expen- 
sive wallpaper lines for 
profitability, monitor distributor 
sales, set and track salesmen’s 
goals, and help the customer 
select the right size, pattern and 
quantity. Solution: Two 32K 
Commodore com- 
uters, flo 
Paisk and aia 
printer. 
Commodore 
does it all— 
and account- 
ing, too. 
In applica- 
tions like 
these, 


and many more, Commodore 
solves the problems that stand in 
the way of increased profitability. 
Commodore can provide the solu- 
tion in your Great American bus- 
iness, too. Find out more by call- 
ing or writing any of Commo- 
dore’s District Sales Offices. 
COSTA MESA, CA 2955 N. Air- 
way Avenue 92626. (714) 979-6307. 
SANTA CLARA, CA 3330 Scott 
Boulevard 95051. (408) 727-1130. 
DECATUR, GA 5360 Snapfinger 
Woods Drive 30035. (404) 987-3311. 
BENSENVILLE, IL 790 Maple 
Lane 60106. (312) 595-5990. 
NORRISTOWN, PA 

950 Rittenhouse Road 19401. 

(215) 666-7950. 

DALLAS, TX 4350 Beltwood 
Parkway South 75234. 

(214) 387-0006. 

Commodore Business Machines, 
Inc., Computer Sales Division, 
Valley Forge Corporate Center. 


950 Ritten- : 
| 
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house Road, 
Norristown, 
commodore 


PA 19401. 


